Metrics for powComplex, real part

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated; 0ms collecting garbage

analyze613.0ms (6.3%)

Memory

25.2MiB live, 440.5MiB allocated; 610ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.8%	0.2%	0%	0%	0%	0
0%	0%	99.8%	0.2%	0%	0%	0%	1
0%	0%	99.8%	0.2%	0%	0%	0%	2
0%	0%	99.8%	0.2%	0%	0%	0%	3
0%	0%	99.8%	0.2%	0%	0%	0%	4
0%	0%	99.8%	0.2%	0%	0%	0%	5
0%	0%	99.8%	0.2%	0%	0%	0%	6
18.8%	18.7%	81.1%	0.2%	0%	0%	0%	7
18.8%	18.7%	81.1%	0.2%	0%	0%	0%	8
18.8%	18.7%	81.1%	0.2%	0%	0%	0%	9
34.4%	34.3%	65.5%	0.2%	0%	0%	0%	10
54.7%	54.6%	45.2%	0.2%	0%	0%	0%	11
54.7%	54.6%	45.2%	0.2%	0%	0%	0%	12

Compiler

Compiled 39 to 18 computations (53.8% saved)

sample2.6s (27.3%)

Memory

70.8MiB live, 2 834.8MiB allocated; 626ms collecting garbage

Samples

1.2s	3 011×	1	valid
885.0ms	5 244×	0	valid
1.0ms	1×	2	valid

Precisions

Click to see histograms. Total time spent on operations: 1.7s

ival-mult: 397.0ms (23% of total)

ival-hypot: 278.0ms (16.1% of total)

ival-log: 234.0ms (13.5% of total)

ival-cos: 228.0ms (13.2% of total)

adjust: 183.0ms (10.6% of total)

ival-atan2: 155.0ms (9% of total)

ival-exp: 115.0ms (6.7% of total)

ival-sub: 77.0ms (4.5% of total)

ival-add: 58.0ms (3.4% of total)

ival-assert: 3.0ms (0.2% of total)

Bogosity

explain432.0ms (4.5%)

Memory

27.5MiB live, 608.5MiB allocated; 40ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
177	-	0	-	`(cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))`
139	-	1	(7.714374883293801e-278 -1.4173755526770714e-156 2.9144187994089587e-189 2.7939164164544024e+303)	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`
5	-	0	-	`(*.f64 (atan2.f64 x.im x.re) y.im)`
4	-	0	-	`(*.f64 (atan2.f64 x.im x.re) y.re)`
0	-	0	-	`(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)`
0	-	0	-	`(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))`
0	-	0	-	`(atan2.f64 x.im x.re)`
0	-	0	-	`(*.f64 x.re x.re)`
0	-	0	-	`(-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))`
0	-	0	-	`x.re`
0	-	0	-	`x.im`
0	-	0	-	`(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))`
0	-	0	-	`(*.f64 x.im x.im)`
0	-	0	-	`(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)`
0	-	0	-	`(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))`
0	-	0	-	`y.re`
0	-	0	-	`y.im`
0	-	0	-	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
0	-	0	-	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`cos.f64`	`(cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))`	sensitivity	175	1
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`	oflow-rescue	122	0
↳	`(*.f64 x.re x.re)`	overflow	62
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	overflow	122
↳	`(*.f64 x.im x.im)`	overflow	75
`cos.f64`	`(cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))`	oflow-rescue	2	0
↳	`(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))`	overflow	2
↳	`(*.f64 x.re x.re)`	overflow	62
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	overflow	122
↳	`(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)`	overflow	2
↳	`(*.f64 x.im x.im)`	overflow	75
`*.f64`	`(*.f64 (atan2.f64 x.im x.re) y.re)`	*nu**	1	0
`*.f64`	`(*.f64 (atan2.f64 x.im x.re) y.im)`	*nu**	1	0
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`	uflow-rescue	1	0
↳	`(*.f64 x.re x.re)`	underflow	69
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	underflow	16
↳	`(*.f64 x.im x.im)`	underflow	53

Confusion

	Predicted +	Predicted -
+	160	2
-	58	36

Precision

0.7339449541284404

Recall

0.9876543209876543

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	160	0	2
-	58	0	36

Precision?

0.7339449541284404

Recall?

0.9876543209876543

Freqs

test

number	freq
0	38
1	135
2	82
3	1

Total Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	1	0	0
-	0	0	0

Precision?

1.0

Recall?

1.0

Samples

167.0ms	352×	1	valid
26.0ms	160×	0	valid

Compiler

Compiled 393 to 61 computations (84.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 156.0ms

ival-mult: 40.0ms (25.6% of total)

adjust: 23.0ms (14.7% of total)

ival-hypot: 20.0ms (12.8% of total)

ival-log: 18.0ms (11.5% of total)

ival-cos: 17.0ms (10.9% of total)

ival-add: 14.0ms (9% of total)

ival-atan2: 13.0ms (8.3% of total)

ival-exp: 5.0ms (3.2% of total)

ival-sub: 4.0ms (2.6% of total)

ival-true: 1.0ms (0.6% of total)

ival-assert: 0.0ms (0% of total)

preprocess199.0ms (2.1%)

Memory

-3.1MiB live, 225.1MiB allocated; 35ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	141	575
1	437	556
2	1292	554
3	3522	552
0	19	37
0	34	37
1	69	36
2	179	36
3	397	36
4	945	36
5	5099	36
0	8111	25

Stop Event

1×	iter limit
1×	node limit
1×	iter limit
1×	node limit

Calls

Call 1

Inputs

(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))

Outputs

(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))

(*.f64 (/.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))

Compiler

Compiled 37 to 19 computations (48.6% saved)

eval0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 4 computations (-∞% saved)

prune1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated; 0ms collecting garbage

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	36.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))

Status

Accuracy

Program

▶

36.9%

(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))

Compiler

Compiled 37 to 19 computations (48.6% saved)

series251.0ms (2.6%)

Memory

-7.4MiB live, 363.2MiB allocated; 112ms collecting garbage

Counts

19 → 272

Calls

Call 1

Inputs
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))
(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)

Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))

Calls

12 calls:

Time	Variable		Point	Expression
67.0ms	y.re	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
31.0ms	x.im	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
29.0ms	x.re	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
20.0ms	x.im	@	-inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
16.0ms	x.re	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))

rewrite300.0ms (3.1%)

Memory

24.1MiB live, 267.3MiB allocated; 74ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1580	20016
0	1611	19810
0	8111	16912

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

291 → 338

Calls

Call 1

Inputs
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))
(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))

Outputs
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(+.f64 (cosh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sinh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (.f64 (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (fabs.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) x.im)
(hypot.f64 (neg.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(/.f64 (-.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
(/.f64 (+.f64 (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(-.f64 (.f64 x.re x.re) (.f64 (neg.f64 x.im) x.im))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
x.re
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (sin.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (.f64 (.f64 (atan2.f64 x.im x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (-.f64 (.f64 (.f64 (atan2.f64 x.im x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (neg.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64))) (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (neg.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.im (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (neg.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.re) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64))) (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (neg.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.im (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 y.re (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx y.re y.re)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 #s(literal 1 binary64) (.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (neg.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (.f64 (neg.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 y.re (-.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx y.im y.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (neg.f64 (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (neg.f64 (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (*.f64 #s(literal 1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))

eval64.0ms (0.7%)

Memory: -8.2MiB live, 123.0MiB allocated; 19ms collecting garbage
Compiler: Compiled 31 786 to 2 820 computations (91.1% saved)

prune76.0ms (0.8%)

Memory

20.8MiB live, 75.6MiB allocated; 9ms collecting garbage

Pruning

27 alts after pruning (27 fresh and 0 done)

	Pruned	Kept	Total
New	429	27	456
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	430	27	457

Accuracy

95.7%

Counts

457 → 27

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	78.9%	(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	59.4%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	26.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	27.3%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	10.7%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
	59.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
	49.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
	37.2%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
	24.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
	60.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
	51.8%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (neg.f64 (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
	26.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (neg.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)))))))
	29.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	14.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	13.8%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	18.7%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	13.3%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
▶	15.0%	(.f64 (exp.f64 (-.f64 (.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	28.1%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	23.4%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	49.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
	53.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
▶	31.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
	37.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
▶	22.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
▶	61.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
	27.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))

Compiler

Compiled 3 104 to 1 702 computations (45.2% saved)

series1.3s (13.5%)

Memory

-43.5MiB live, 1 175.8MiB allocated; 934ms collecting garbage

Counts

63 → 618

Calls

Call 1

Inputs
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(hypot.f64 x.im x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(*.f64 y.im (atan2.f64 x.im x.re))
(.f64 (exp.f64 (-.f64 (.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (.f64 #s(approx (log (sqrt (+ ( x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (.f64 #s(approx (log (sqrt (+ ( x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(.f64 #s(approx (log (sqrt (+ ( x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))) y.re)
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
(-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))
(log.f64 x.im)
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))
#s(literal -1/2 binary64)
(/.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
(*.f64 (atan2.f64 x.im x.re) y.im)
(cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))
(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))
(pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)
(/.f64 #s(literal -1 binary64) x.re)
(exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))
(pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)
(*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))
(neg.f64 y.im)

Outputs
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (neg (atan2 x.im x.re)) y.im) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (neg (atan2 x.im x.re)) #s(hole binary64 (* -1 (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* -1/2 (/ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (pow x.re 2) (pow x.im 2)))))
#s(approx (/ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (/ (pow x.re 2) (pow x.im 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.re))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (* -1 (log x.re))))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (log x.re))))))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 (exp (* y.im (+ (log -1) (* -1 (log x.re)))))))
#s(approx (/ -1 x.re) #s(hole binary64 (/ -1 x.re)))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (* -1 (log x.re)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (* -1 (log x.re))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log x.re))))))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log x.re)))))))
#s(approx (* (neg y.im) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 (pow x.im 2))) (/ (log x.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.re))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (log (/ 1 x.re))))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (* y.im (+ (log -1) (log (/ 1 x.re))))))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 (exp (* y.im (+ (log -1) (log (/ 1 x.re)))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (log (/ 1 x.re)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (log (/ 1 x.re))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (* y.re (+ (log -1) (log (/ 1 x.re))))))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 (exp (* y.re (+ (log -1) (log (/ 1 x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (log (pow (/ -1 x.re) y.im))))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 (pow (/ -1 x.re) y.im)))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (log (pow (/ -1 x.re) y.re))))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 (pow (/ -1 x.re) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (/ (- (* (pow x.im 2) (log x.im)) (* -1/2 (pow x.re 2))) (pow x.im 2))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log -1) (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 1))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1 (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.re))))) (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))))) (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* 1/2 (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.re)) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))))))))) (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (* (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* 1/2 (pow (log (/ -1 x.re)) 2))) (atan2 x.im x.re))))) (+ (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3)))) (+ (* -1/6 (pow (log (/ -1 x.re)) 3)) (* 1/2 (* (log (/ -1 x.re)) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))))))))) (+ (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* 1/2 (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.re)) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re))))))))))) (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* -1 (log (pow (/ -1 x.re) y.im))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* -1 (* y.re (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* y.re (- (* -1/2 (* y.re (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (pow (atan2 x.im x.re) 2)))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (log (pow (/ -1 x.re) y.im)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* -1 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.re))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* 1/2 (pow (log (/ -1 x.re)) 2))))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* y.re (+ (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3)))) (+ (* -1/6 (pow (log (/ -1 x.re)) 3)) (* 1/2 (* (log (/ -1 x.re)) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* 1/2 (pow (log (/ -1 x.re)) 2)))))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (+ (* -1 (log (/ -1 x.re))) (* -1/2 (* y.re (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (+ (* -1 (log (/ -1 x.re))) (* y.re (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* -1/6 (* y.re (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3))))))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (* y.re (log (/ -1 x.re)))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (* y.re (+ (log (/ -1 x.re)) (* 1/2 (* y.re (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (* y.re (+ (log (/ -1 x.re)) (* y.re (+ (* 1/6 (* y.re (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3))))) (* 1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (* y.re (+ (log (/ -1 x.re)) (* y.re (+ (* 1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* y.re (+ (* 1/24 (* y.re (+ (* -6 (pow (log (/ -1 x.re)) 4)) (+ (* -4 (pow (log (/ -1 x.re)) 4)) (+ (* -3 (pow (log (/ -1 x.re)) 4)) (+ (* 12 (pow (log (/ -1 x.re)) 4)) (pow (log (/ -1 x.re)) 4))))))) (* 1/6 (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3))))))))))))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 1))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 (+ 1 (* y.re (log (/ -1 x.re))))))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (/ -1 x.re)) (* 1/2 (* y.re (pow (log (/ -1 x.re)) 2))))))))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (/ -1 x.re)) (* y.re (+ (* 1/6 (* y.re (pow (log (/ -1 x.re)) 3))) (* 1/2 (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.re) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (log (pow (/ -1 x.re) y.im)) y.re)) (atan2 x.im x.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.re)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (/ (log (pow (/ -1 x.re) y.im)) y.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/2 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/6 (* (pow (log x.re) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (/ (cos (* y.re (atan2 x.im x.re))) (pow (/ -1 x.re) y.re))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)) (pow (/ -1 x.re) y.re))) (/ (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.re) y.re)))) (/ (cos (* y.re (atan2 x.im x.re))) (pow (/ -1 x.re) y.re)))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)) (pow (/ -1 x.re) y.re))) (+ (* y.im (- (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (pow (/ -1 x.re) y.re))) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 2)) (pow (/ -1 x.re) y.re))) (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)) (pow (/ -1 x.re) y.re))))) (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (pow (/ -1 x.re) y.re))))) (/ (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.re) y.re))))) (/ (cos (* y.re (atan2 x.im x.re))) (pow (/ -1 x.re) y.re)))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)) (pow (/ -1 x.re) y.re))) (+ (* y.im (- (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (pow (/ -1 x.re) y.re))) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 2)) (pow (/ -1 x.re) y.re))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)) (pow (/ -1 x.re) y.re))) (* y.im (- (+ (* -1 (/ (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 2))) (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))))) (atan2 x.im x.re)) (pow (/ -1 x.re) y.re))) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (/ -1 x.re)) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))) (pow (/ -1 x.re) y.re))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)) (pow (/ -1 x.re) y.re))) (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (pow (/ -1 x.re) y.re)))))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3)))) (* 1/6 (pow (log (/ -1 x.re)) 3)))) (pow (/ -1 x.re) y.re))))))) (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (pow (/ -1 x.re) y.re))))) (/ (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.re) y.re))))) (/ (cos (* y.re (atan2 x.im x.re))) (pow (/ -1 x.re) y.re)))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 2))) (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))) (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 2))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (/ -1 x.re)) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3)))) (* 1/6 (pow (log (/ -1 x.re)) 3))))))) (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))) (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ -1 x.re))) (* -1/2 (* y.im (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ -1 x.re))) (* y.im (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* -1/6 (* y.im (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3))))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (* y.im (log (/ -1 x.re)))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (* y.im (+ (log (/ -1 x.re)) (* 1/2 (* y.im (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (* y.im (+ (log (/ -1 x.re)) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3))))) (* 1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (* y.im (+ (log (/ -1 x.re)) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (/ -1 x.re)) 4)) (+ (* -4 (pow (log (/ -1 x.re)) 4)) (+ (* -3 (pow (log (/ -1 x.re)) 4)) (+ (* 12 (pow (log (/ -1 x.re)) 4)) (pow (log (/ -1 x.re)) 4))))))) (* 1/6 (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3))))))))))))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 1))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 (+ 1 (* y.im (log (/ -1 x.re))))))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (/ -1 x.re)) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))))))))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (/ -1 x.re)) (* y.im (+ (* 1/6 (* y.im (pow (log (/ -1 x.re)) 3))) (* 1/2 (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (pow (/ -1 x.re) y.re))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* y.im (atan2 x.im x.re)) (pow (/ -1 x.re) y.re))) (/ 1 (pow (/ -1 x.re) y.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (atan2 x.im x.re) (pow (/ -1 x.re) y.re))) (* 1/2 (/ (* y.im (pow (atan2 x.im x.re) 2)) (pow (/ -1 x.re) y.re))))) (/ 1 (pow (/ -1 x.re) y.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (atan2 x.im x.re) (pow (/ -1 x.re) y.re))) (* y.im (+ (* -1/6 (/ (* y.im (pow (atan2 x.im x.re) 3)) (pow (/ -1 x.re) y.re))) (* 1/2 (/ (pow (atan2 x.im x.re) 2) (pow (/ -1 x.re) y.re))))))) (/ 1 (pow (/ -1 x.re) y.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (log (pow (/ -1 x.re) y.re)))))
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.re)) y.im) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (* -1 (/ (log (pow (/ -1 x.re) y.re)) y.im)) (* -1 (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.re)) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (/ (log (pow (/ -1 x.re) y.re)) y.im) (atan2 x.im x.re))))))

Calls

12 calls:

Time	Variable		Point	Expression
453.0ms	y.im	@	inf	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) -1 (log (pow (/ -1 x.re) y.im)) (pow (/ -1 x.re) y.im) (/ -1 x.re) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (log (pow (/ -1 x.re) y.re)) (pow (/ -1 x.re) y.re) (* (neg y.im) (atan2 x.im x.re)) (neg y.im))
142.0ms	x.re	@	inf	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) -1 (log (pow (/ -1 x.re) y.im)) (pow (/ -1 x.re) y.im) (/ -1 x.re) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (log (pow (/ -1 x.re) y.re)) (pow (/ -1 x.re) y.re) (* (neg y.im) (atan2 x.im x.re)) (neg y.im))
94.0ms	x.re	@	-inf	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) -1 (log (pow (/ -1 x.re) y.im)) (pow (/ -1 x.re) y.im) (/ -1 x.re) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (log (pow (/ -1 x.re) y.re)) (pow (/ -1 x.re) y.re) (* (neg y.im) (atan2 x.im x.re)) (neg y.im))
93.0ms	x.re	@	0	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) -1 (log (pow (/ -1 x.re) y.im)) (pow (/ -1 x.re) y.im) (/ -1 x.re) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (log (pow (/ -1 x.re) y.re)) (pow (/ -1 x.re) y.re) (* (neg y.im) (atan2 x.im x.re)) (neg y.im))
85.0ms	x.im	@	0	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) -1 (log (pow (/ -1 x.re) y.im)) (pow (/ -1 x.re) y.im) (/ -1 x.re) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (log (pow (/ -1 x.re) y.re)) (pow (/ -1 x.re) y.re) (* (neg y.im) (atan2 x.im x.re)) (neg y.im))

rewrite384.0ms (4%)

Memory

2.5MiB live, 606.3MiB allocated; 94ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3269	42143
0	3381	40500
0	10947	38991

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

681 → 767

Calls

Call 1

Inputs
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(hypot.f64 x.im x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(*.f64 y.im (atan2.f64 x.im x.re))
(.f64 (exp.f64 (-.f64 (.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (.f64 #s(approx (log (sqrt (+ ( x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (.f64 #s(approx (log (sqrt (+ ( x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(.f64 #s(approx (log (sqrt (+ ( x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))) y.re)
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
(-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))
(log.f64 x.im)
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))
#s(literal -1/2 binary64)
(/.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
(*.f64 (atan2.f64 x.im x.re) y.im)
(cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))
(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))
(pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)
(/.f64 #s(literal -1 binary64) x.re)
(exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))
(pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)
(*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))
(neg.f64 y.im)
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (neg (atan2 x.im x.re)) y.im) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (neg (atan2 x.im x.re)) #s(hole binary64 (* -1 (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* -1/2 (/ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (pow x.re 2) (pow x.im 2)))))
#s(approx (/ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (/ (pow x.re 2) (pow x.im 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.re))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (* -1 (log x.re))))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (log x.re))))))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 (exp (* y.im (+ (log -1) (* -1 (log x.re)))))))
#s(approx (/ -1 x.re) #s(hole binary64 (/ -1 x.re)))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (* -1 (log x.re)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (* -1 (log x.re))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log x.re))))))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log x.re)))))))
#s(approx (* (neg y.im) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 (pow x.im 2))) (/ (log x.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.re))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (log (/ 1 x.re))))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (* y.im (+ (log -1) (log (/ 1 x.re))))))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 (exp (* y.im (+ (log -1) (log (/ 1 x.re)))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (log (/ 1 x.re)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (log (/ 1 x.re))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (* y.re (+ (log -1) (log (/ 1 x.re))))))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 (exp (* y.re (+ (log -1) (log (/ 1 x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (log (pow (/ -1 x.re) y.im))))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 (pow (/ -1 x.re) y.im)))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (log (pow (/ -1 x.re) y.re))))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 (pow (/ -1 x.re) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (/ (- (* (pow x.im 2) (log x.im)) (* -1/2 (pow x.re 2))) (pow x.im 2))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log -1) (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 1))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1 (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.re))))) (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))))) (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* 1/2 (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.re)) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))))))))) (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (* (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* 1/2 (pow (log (/ -1 x.re)) 2))) (atan2 x.im x.re))))) (+ (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3)))) (+ (* -1/6 (pow (log (/ -1 x.re)) 3)) (* 1/2 (* (log (/ -1 x.re)) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))))))))) (+ (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* 1/2 (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.re)) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re))))))))))) (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* -1 (log (pow (/ -1 x.re) y.im))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* -1 (* y.re (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* y.re (- (* -1/2 (* y.re (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (pow (atan2 x.im x.re) 2)))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* -1 (log (pow (/ -1 x.re) y.im)))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* -1 (log (pow (/ -1 x.re) y.im)))) (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (log (pow (/ -1 x.re) y.im)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* -1 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.re))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* 1/2 (pow (log (/ -1 x.re)) 2))))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* y.re (+ (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3)))) (+ (* -1/6 (pow (log (/ -1 x.re)) 3)) (* 1/2 (* (log (/ -1 x.re)) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* 1/2 (pow (log (/ -1 x.re)) 2)))))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (+ (* -1 (log (/ -1 x.re))) (* -1/2 (* y.re (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (+ (* -1 (log (/ -1 x.re))) (* y.re (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* -1/6 (* y.re (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3))))))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (* y.re (log (/ -1 x.re)))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (* y.re (+ (log (/ -1 x.re)) (* 1/2 (* y.re (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (* y.re (+ (log (/ -1 x.re)) (* y.re (+ (* 1/6 (* y.re (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3))))) (* 1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) #s(hole binary64 (* y.re (+ (log (/ -1 x.re)) (* y.re (+ (* 1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* y.re (+ (* 1/24 (* y.re (+ (* -6 (pow (log (/ -1 x.re)) 4)) (+ (* -4 (pow (log (/ -1 x.re)) 4)) (+ (* -3 (pow (log (/ -1 x.re)) 4)) (+ (* 12 (pow (log (/ -1 x.re)) 4)) (pow (log (/ -1 x.re)) 4))))))) (* 1/6 (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3))))))))))))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 1))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 (+ 1 (* y.re (log (/ -1 x.re))))))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (/ -1 x.re)) (* 1/2 (* y.re (pow (log (/ -1 x.re)) 2))))))))
#s(approx (pow (/ -1 x.re) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (/ -1 x.re)) (* y.re (+ (* 1/6 (* y.re (pow (log (/ -1 x.re)) 3))) (* 1/2 (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.re) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (log (pow (/ -1 x.re) y.im)) y.re)) (atan2 x.im x.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.re)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (/ (log (pow (/ -1 x.re) y.im)) y.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/2 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/6 (* (pow (log x.re) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (/ (cos (* y.re (atan2 x.im x.re))) (pow (/ -1 x.re) y.re))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)) (pow (/ -1 x.re) y.re))) (/ (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.re) y.re)))) (/ (cos (* y.re (atan2 x.im x.re))) (pow (/ -1 x.re) y.re)))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)) (pow (/ -1 x.re) y.re))) (+ (* y.im (- (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (pow (/ -1 x.re) y.re))) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 2)) (pow (/ -1 x.re) y.re))) (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)) (pow (/ -1 x.re) y.re))))) (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (pow (/ -1 x.re) y.re))))) (/ (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.re) y.re))))) (/ (cos (* y.re (atan2 x.im x.re))) (pow (/ -1 x.re) y.re)))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)) (pow (/ -1 x.re) y.re))) (+ (* y.im (- (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (pow (/ -1 x.re) y.re))) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 2)) (pow (/ -1 x.re) y.re))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)) (pow (/ -1 x.re) y.re))) (* y.im (- (+ (* -1 (/ (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 2))) (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))))) (atan2 x.im x.re)) (pow (/ -1 x.re) y.re))) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (/ -1 x.re)) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))) (pow (/ -1 x.re) y.re))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)) (pow (/ -1 x.re) y.re))) (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (pow (/ -1 x.re) y.re)))))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3)))) (* 1/6 (pow (log (/ -1 x.re)) 3)))) (pow (/ -1 x.re) y.re))))))) (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (pow (/ -1 x.re) y.re))))) (/ (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.re) y.re))))) (/ (cos (* y.re (atan2 x.im x.re))) (pow (/ -1 x.re) y.re)))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 2))) (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))) (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 2))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (/ -1 x.re)) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3)))) (* 1/6 (pow (log (/ -1 x.re)) 3))))))) (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))) (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ -1 x.re))) (* -1/2 (* y.im (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ -1 x.re))) (* y.im (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* -1/6 (* y.im (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3))))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (* y.im (log (/ -1 x.re)))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (* y.im (+ (log (/ -1 x.re)) (* 1/2 (* y.im (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (* y.im (+ (log (/ -1 x.re)) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3))))) (* 1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (log (pow (/ -1 x.re) y.im)) #s(hole binary64 (* y.im (+ (log (/ -1 x.re)) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (/ -1 x.re)) 2)) (pow (log (/ -1 x.re)) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (/ -1 x.re)) 4)) (+ (* -4 (pow (log (/ -1 x.re)) 4)) (+ (* -3 (pow (log (/ -1 x.re)) 4)) (+ (* 12 (pow (log (/ -1 x.re)) 4)) (pow (log (/ -1 x.re)) 4))))))) (* 1/6 (+ (* -3 (pow (log (/ -1 x.re)) 3)) (+ (* 2 (pow (log (/ -1 x.re)) 3)) (pow (log (/ -1 x.re)) 3))))))))))))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 1))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 (+ 1 (* y.im (log (/ -1 x.re))))))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (/ -1 x.re)) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))))))))
#s(approx (pow (/ -1 x.re) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (/ -1 x.re)) (* y.im (+ (* 1/6 (* y.im (pow (log (/ -1 x.re)) 3))) (* 1/2 (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (pow (/ -1 x.re) y.re))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* y.im (atan2 x.im x.re)) (pow (/ -1 x.re) y.re))) (/ 1 (pow (/ -1 x.re) y.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (atan2 x.im x.re) (pow (/ -1 x.re) y.re))) (* 1/2 (/ (* y.im (pow (atan2 x.im x.re) 2)) (pow (/ -1 x.re) y.re))))) (/ 1 (pow (/ -1 x.re) y.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (atan2 x.im x.re) (pow (/ -1 x.re) y.re))) (* y.im (+ (* -1/6 (/ (* y.im (pow (atan2 x.im x.re) 3)) (pow (/ -1 x.re) y.re))) (* 1/2 (/ (pow (atan2 x.im x.re) 2) (pow (/ -1 x.re) y.re))))))) (/ 1 (pow (/ -1 x.re) y.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (log (pow (/ -1 x.re) y.re)))))
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.re)) y.im) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (* -1 (/ (log (pow (/ -1 x.re) y.re)) y.im)) (* -1 (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.re)) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (/ (log (pow (/ -1 x.re) y.re)) y.im) (atan2 x.im x.re))))))

Outputs
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(+.f64 (cosh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sinh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (-.f64 (.f64 (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (sin.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (-.f64 (.f64 (.f64 (atan2.f64 x.im x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.re #s(literal 2 binary64)))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (cos.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (.f64 y.im (log.f64 x.re)) #s(literal 3 binary64)) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.im (log.f64 x.re)) (-.f64 (.f64 (.f64 y.re (atan2.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (exp.f64 (.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
(-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(log.f64 (pow.f64 x.re y.re))
(*.f64 y.im (atan2.f64 x.im x.re))
(.f64 (exp.f64 (-.f64 (.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (exp.f64 (.f64 #s(approx (log (sqrt (+ ( x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (.f64 #s(approx (log (sqrt (+ ( x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 #s(approx (log (sqrt (+ ( x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(-.f64 (.f64 #s(approx (log (sqrt (+ ( x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(.f64 #s(approx (log (sqrt (+ ( x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) y.re)
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))
(-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))
(log.f64 x.im)
(.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))
#s(literal -1/2 binary64)
(*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))
(/.f64 (neg.f64 (.f64 x.re x.re)) (neg.f64 (.f64 x.im x.im)))
(/.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(*.f64 (atan2.f64 x.im x.re) y.im)
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (sin.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (-.f64 (.f64 (.f64 (atan2.f64 x.im x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(/.f64 (+.f64 (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 (.f64 x.re x.re) (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (cos.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64))) (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64))) (-.f64 (.f64 (.f64 y.re (atan2.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64))) (.f64 y.re (atan2.f64 x.im x.re))))))
(fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))
(pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))
(/.f64 #s(literal 1 binary64) (neg.f64 x.re))
(/.f64 #s(literal -1 binary64) x.re)
(.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sinh.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(/.f64 (+.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (-.f64 (.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))
(pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))
(*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))
(neg.f64 y.im)
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (* (neg (atan2 x.im x.re)) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (neg (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (log.f64 x.re))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (*.f64 y.re (log.f64 x.re)))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))
#s(approx (* -1/2 (/ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))
#s(approx (/ (* x.re x.re) (* x.im x.im)) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.im (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log (pow (/ -1 x.re) y.im)) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))
#s(approx (pow (/ -1 x.re) y.im) (pow.f64 (exp.f64 y.im) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))
#s(approx (/ -1 x.re) (/.f64 #s(literal -1 binary64) x.re))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))))
#s(approx (log (pow (/ -1 x.re) y.re)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))
#s(approx (pow (/ -1 x.re) y.re) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))
#s(approx (* (neg y.im) (atan2 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)) (/.f64 (log.f64 x.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log (pow (/ -1 x.re) y.im)) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))
#s(approx (pow (/ -1 x.re) y.im) (pow.f64 (exp.f64 y.im) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))))
#s(approx (log (pow (/ -1 x.re) y.re)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))
#s(approx (pow (/ -1 x.re) y.re) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log (pow (/ -1 x.re) y.im)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))
#s(approx (pow (/ -1 x.re) y.im) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (log (pow (/ -1 x.re) y.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))
#s(approx (pow (/ -1 x.re) y.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (/.f64 (-.f64 (.f64 (.f64 x.im x.im) (log.f64 x.im)) (.f64 #s(literal -1/2 binary64) (.f64 x.re x.re))) (*.f64 x.im x.im)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.im (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))
#s(approx (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx y.re y.re)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 #s(literal -1 binary64) (.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re)))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (*.f64 y.im (log.f64 x.re))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re)))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 #s(literal -1 binary64) (.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im) #s(literal -1 binary64))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (fma.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal -1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (.f64 #s(literal -1/6 binary64) (*.f64 y.re (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))
#s(approx (log (pow (/ -1 x.re) y.re)) (.f64 y.re (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) (.f64 y.re (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))
#s(approx (log (pow (/ -1 x.re) y.re)) (.f64 y.re (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (.f64 y.re (fma.f64 #s(literal 1/24 binary64) (.f64 y.re (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))))))))
#s(approx (pow (/ -1 x.re) y.re) #s(literal 1 binary64))
#s(approx (pow (/ -1 x.re) y.re) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (pow (/ -1 x.re) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))
#s(approx (pow (/ -1 x.re) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.re (+.f64 (/.f64 (.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (log.f64 x.re)))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 y.re (+.f64 (log.f64 x.re) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (log.f64 x.re)) y.re) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 x.re) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx y.im y.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))) (pow.f64 x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (/.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (/.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (/.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (/.f64 (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (/.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal -1/2 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log (pow (/ -1 x.re) y.im)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))
#s(approx (log (pow (/ -1 x.re) y.im)) (.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))
#s(approx (log (pow (/ -1 x.re) y.im)) (.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.im (fma.f64 #s(literal 1/6 binary64) (.f64 y.im (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))
#s(approx (log (pow (/ -1 x.re) y.im)) (.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (.f64 y.im (fma.f64 #s(literal 1/24 binary64) (.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))))))))
#s(approx (pow (/ -1 x.re) y.im) #s(literal 1 binary64))
#s(approx (pow (/ -1 x.re) y.im) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (pow (/ -1 x.re) y.im) (+.f64 #s(literal 1 binary64) (.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))
#s(approx (pow (/ -1 x.re) y.im) (+.f64 #s(literal 1 binary64) (.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.im (fma.f64 #s(literal 1/6 binary64) (.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))
#s(approx (neg y.im) (*.f64 #s(literal -1 binary64) y.im))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 y.im (-.f64 (/.f64 (.f64 y.re (log.f64 x.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (* (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* -1 (log (pow (/ -1 x.re) y.im))) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) y.im) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.re) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (log.f64 x.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im)) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.re) y.re))) (* (neg y.im) (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) y.im) (atan2.f64 x.im x.re)))))

eval230.0ms (2.4%)

Memory: 34.7MiB live, 233.1MiB allocated; 41ms collecting garbage
Compiler: Compiled 75 492 to 5 244 computations (93.1% saved)

prune77.0ms (0.8%)

Memory

-12.7MiB live, 90.3MiB allocated; 8ms collecting garbage

Pruning

34 alts after pruning (34 fresh and 0 done)

	Pruned	Kept	Total
New	910	26	936
Fresh	14	8	22
Picked	5	0	5
Done	0	0	0
Total	929	34	963

Accuracy

96.6%

Counts

963 → 34

Alt Table

Click to see full alt table

Status	Accuracy	Program
	38.4%	(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
	26.0%	(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
▶	78.5%	(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
	59.4%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	27.3%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	59.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
	24.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
	29.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	48.3%	(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	28.1%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	23.4%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	62.6%	(.f64 #s(approx (exp (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
▶	28.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
	25.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
	37.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
	27.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 #s(approx (pow (/ -1 x.re) y.im) (+.f64 #s(literal 1 binary64) (.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
▶	51.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	41.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
	44.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
	34.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
	42.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))) y.re)))
	39.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
	39.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
	36.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
	39.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
▶	23.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
	15.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))) (*.f64 x.re x.re)))))))
	28.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
	31.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 #s(approx (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
	49.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
	66.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
	20.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
	46.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
▶	28.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

Compiler

Compiled 3 880 to 2 102 computations (45.8% saved)

series287.0ms (3%)

Memory

23.3MiB live, 434.2MiB allocated; 71ms collecting garbage

Counts

48 → 453

Calls

Call 1

Inputs
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
(cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(*.f64 x.re x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re))
#s(literal 1/2 binary64)
(/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im))
(.f64 (.f64 x.re x.re) (*.f64 y.re (pow.f64 x.im y.re)))
(*.f64 y.re (pow.f64 x.im y.re))
(pow.f64 x.im y.re)
(*.f64 x.im x.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(*.f64 y.im (atan2.f64 x.im x.re))

Outputs
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (neg (atan2 x.im x.re)) y.im) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (neg (atan2 x.im x.re)) #s(hole binary64 (* -1 (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* (pow x.re 2) (* y.re (pow x.im y.re)))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (/ (pow x.im y.re) (pow x.re 2))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) (* y.re (pow x.im y.re)))) (* (pow x.im 2) (pow x.im y.re))) (pow x.im 2))))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 (* y.re (pow x.im y.re))))
#s(approx (pow x.im y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (pow x.im y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (+ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) (* y.re (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))) (pow x.im 2))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* (pow x.re 2) (* y.re (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 (* y.re (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (pow x.im y.re) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 1))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 1))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (* y.re (+ (* 1/2 (/ (* (pow x.re 2) (log x.im)) (pow x.im 2))) (* 1/2 (pow (log x.im) 2))))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (* y.re (+ (* 1/2 (/ (* (pow x.re 2) (log x.im)) (pow x.im 2))) (+ (* 1/2 (pow (log x.im) 2)) (* y.re (+ (* 1/6 (pow (log x.im) 3)) (* 1/4 (/ (* (pow x.re 2) (pow (log x.im) 2)) (pow x.im 2))))))))))))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) y.re) (pow x.im 2))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (* y.re (+ (/ (* (pow x.re 2) (* y.re (log x.im))) (pow x.im 2)) (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (* y.re (+ (* y.re (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (log x.im) 2))) (pow x.im 2))) (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)))) (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* (pow x.re 2) (* y.re (pow (log x.im) 3))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (pow (log x.im) 2)) (pow x.im 2))))) (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)))) (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* (pow x.re 2) y.re)))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* y.re (+ (* (pow x.re 2) (* y.re (log x.im))) (pow x.re 2)))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* 1/2 (* (pow x.re 2) (* y.re (pow (log x.im) 2)))) (* (pow x.re 2) (log x.im)))) (pow x.re 2)))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* 1/6 (* (pow x.re 2) (* y.re (pow (log x.im) 3)))) (* 1/2 (* (pow x.re 2) (pow (log x.im) 2))))) (* (pow x.re 2) (log x.im)))) (pow x.re 2)))))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 y.re))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 (* y.re (+ 1 (* y.re (log x.im))))))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 (* y.re (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2)))))))))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 (* y.re (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))))
#s(approx (pow x.im y.re) #s(hole binary64 1))
#s(approx (pow x.im y.re) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (pow x.im y.re) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (pow x.im y.re) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 3) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))) (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (atan2 x.im x.re)))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (* (pow x.re 2) (pow x.im y.re)) (pow x.im 2))) (/ (pow x.im y.re) y.re)))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.re) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (pow x.im y.re) y.re)) (* -1/2 (/ (* (pow x.re 2) (pow x.im y.re)) (pow x.im 2))))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log x.re))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.re)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log x.re) (pow x.re y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log x.re) (pow x.re y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log x.re) (pow x.re y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* y.im (log x.re))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log x.re) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.re)) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.re)) y.im)) (* -1 (atan2 x.im x.re)))))))

Calls

12 calls:

Time	Variable		Point	Expression
39.0ms	x.re	@	0	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) 1 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (/ (PI) 2) (PI) 2 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))
35.0ms	x.re	@	-inf	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) 1 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (/ (PI) 2) (PI) 2 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))
32.0ms	x.im	@	inf	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) 1 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (/ (PI) 2) (PI) 2 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))
27.0ms	x.im	@	0	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) 1 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (/ (PI) 2) (PI) 2 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))
26.0ms	x.im	@	-inf	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) 1 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (/ (PI) 2) (PI) 2 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))

rewrite365.0ms (3.8%)

Memory

9.4MiB live, 480.4MiB allocated; 71ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2722	34358
0	2792	33699
0	9322	31106

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

501 → 560

Calls

Call 1

Inputs
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
(cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(*.f64 x.re x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re))
#s(literal 1/2 binary64)
(/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im))
(.f64 (.f64 x.re x.re) (*.f64 y.re (pow.f64 x.im y.re)))
(*.f64 y.re (pow.f64 x.im y.re))
(pow.f64 x.im y.re)
(*.f64 x.im x.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(*.f64 y.im (atan2.f64 x.im x.re))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (neg (atan2 x.im x.re)) y.im) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (neg (atan2 x.im x.re)) #s(hole binary64 (* -1 (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* (pow x.re 2) (* y.re (pow x.im y.re)))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (/ (pow x.im y.re) (pow x.re 2))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) (* y.re (pow x.im y.re)))) (* (pow x.im 2) (pow x.im y.re))) (pow x.im 2))))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 (* y.re (pow x.im y.re))))
#s(approx (pow x.im y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (pow x.im y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (+ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) (* y.re (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))) (pow x.im 2))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* (pow x.re 2) (* y.re (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 (* y.re (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (pow x.im y.re) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 1))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 1))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (* y.re (+ (* 1/2 (/ (* (pow x.re 2) (log x.im)) (pow x.im 2))) (* 1/2 (pow (log x.im) 2))))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (* y.re (+ (* 1/2 (/ (* (pow x.re 2) (log x.im)) (pow x.im 2))) (+ (* 1/2 (pow (log x.im) 2)) (* y.re (+ (* 1/6 (pow (log x.im) 3)) (* 1/4 (/ (* (pow x.re 2) (pow (log x.im) 2)) (pow x.im 2))))))))))))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) y.re) (pow x.im 2))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (* y.re (+ (/ (* (pow x.re 2) (* y.re (log x.im))) (pow x.im 2)) (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (* y.re (+ (* y.re (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (log x.im) 2))) (pow x.im 2))) (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)))) (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* (pow x.re 2) (* y.re (pow (log x.im) 3))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (pow (log x.im) 2)) (pow x.im 2))))) (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)))) (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* (pow x.re 2) y.re)))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* y.re (+ (* (pow x.re 2) (* y.re (log x.im))) (pow x.re 2)))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* 1/2 (* (pow x.re 2) (* y.re (pow (log x.im) 2)))) (* (pow x.re 2) (log x.im)))) (pow x.re 2)))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* 1/6 (* (pow x.re 2) (* y.re (pow (log x.im) 3)))) (* 1/2 (* (pow x.re 2) (pow (log x.im) 2))))) (* (pow x.re 2) (log x.im)))) (pow x.re 2)))))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 y.re))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 (* y.re (+ 1 (* y.re (log x.im))))))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 (* y.re (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2)))))))))
#s(approx (* y.re (pow x.im y.re)) #s(hole binary64 (* y.re (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))))
#s(approx (pow x.im y.re) #s(hole binary64 1))
#s(approx (pow x.im y.re) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (pow x.im y.re) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (pow x.im y.re) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 3) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))) (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (atan2 x.im x.re)))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (* (pow x.re 2) (pow x.im y.re)) (pow x.im 2))) (/ (pow x.im y.re) y.re)))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.re) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (pow x.im y.re) y.re)) (* -1/2 (/ (* (pow x.re 2) (pow x.im y.re)) (pow x.im 2))))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log x.re))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.re)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log x.re) (pow x.re y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log x.re) (pow x.re y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log x.re) (pow x.re y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* y.im (log x.re))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log x.re) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.re)) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.re)) y.im)) (* -1 (atan2 x.im x.re)))))))

Outputs
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(+.f64 (cosh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sinh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (-.f64 (.f64 (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
(/.f64 (+.f64 (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 (.f64 x.im x.im) (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(+.f64 (.f64 x.im x.im) (.f64 x.re x.re))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) x.im)) (pow.f64 x.im y.re)))))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) x.im)) (pow.f64 x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) x.im)) (pow.f64 x.im y.re)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) x.im))) #s(literal 3 binary64)) (pow.f64 (pow.f64 x.im y.re) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) x.im))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) x.im))) (-.f64 (.f64 (pow.f64 x.im y.re) (pow.f64 x.im y.re)) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) x.im))) (pow.f64 x.im y.re)))))
(fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) x.im)) (pow.f64 x.im y.re))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) x.im))) (pow.f64 x.im y.re))
#s(literal 1/2 binary64)
(.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) x.im))
(/.f64 (neg.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re)))) (neg.f64 (.f64 x.im x.im)))
(/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im))
(.f64 (.f64 x.re x.re) (*.f64 y.re (pow.f64 x.im y.re)))
(*.f64 y.re (pow.f64 x.im y.re))
(pow.f64 x.im y.re)
(exp.f64 (*.f64 (log.f64 x.im) y.re))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
(fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (cos.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 y.im (log.f64 x.re)) #s(literal 3 binary64)) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.im (log.f64 x.re)) (-.f64 (.f64 (.f64 y.re (atan2.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (exp.f64 (.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
(-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(log.f64 (pow.f64 x.re y.re))
(*.f64 y.im (atan2.f64 x.im x.re))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (* (neg (atan2 x.im x.re)) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (neg (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) x.im)) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (pow.f64 x.im y.re))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) x.im)) (pow.f64 x.im y.re)))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) x.im)))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) (.f64 (.f64 x.re x.re) (*.f64 y.re (pow.f64 x.im y.re))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (log.f64 x.re))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (*.f64 y.re (log.f64 x.re)))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) x.im))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (*.f64 x.re x.re)))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (pow.f64 x.im (+.f64 #s(literal 2 binary64) y.re))) (.f64 x.im x.im)))
#s(approx (* y.re (pow x.im y.re)) (*.f64 y.re (pow.f64 x.im y.re)))
#s(approx (pow x.im y.re) (pow.f64 x.im y.re))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (* y.re (pow x.im y.re)) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (pow x.im y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (+.f64 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))) (*.f64 x.im x.im)))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))) (.f64 x.im x.im)))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) (.f64 (.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))))
#s(approx (* y.re (pow x.im y.re)) (*.f64 y.re (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))))
#s(approx (pow x.im y.re) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx y.re y.re)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 #s(literal -1 binary64) (.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(literal 1 binary64))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 x.im)) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 x.im)) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (.f64 x.re (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 x.im x.im)))))))))))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (.f64 y.re (/.f64 (fma.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 x.im)) (.f64 x.re x.re)) (*.f64 x.im x.im))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (.f64 x.im x.im)) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 x.im)) (.f64 x.im x.im))) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (.f64 x.re (log.f64 x.im)) #s(literal 2 binary64)) (.f64 x.im x.im)))) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 x.im)) (.f64 x.im x.im))) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) (.f64 (.f64 x.re x.re) y.re))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) (.f64 y.re (fma.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 x.im)) (.f64 x.re x.re))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (.f64 (.f64 x.re x.re) (log.f64 x.im))) (*.f64 x.re x.re))))
#s(approx (* (* x.re x.re) (* y.re (pow x.im y.re))) (.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.re (log.f64 x.im)) #s(literal 2 binary64)))) (.f64 (.f64 x.re x.re) (log.f64 x.im))) (*.f64 x.re x.re))))
#s(approx (* y.re (pow x.im y.re)) y.re)
#s(approx (* y.re (pow x.im y.re)) (.f64 y.re (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 x.im)))))
#s(approx (* y.re (pow x.im y.re)) (.f64 y.re (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (* y.re (pow x.im y.re)) (.f64 y.re (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))))
#s(approx (pow x.im y.re) #s(literal 1 binary64))
#s(approx (pow x.im y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))))
#s(approx (pow x.im y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))
#s(approx (pow x.im y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (pow.f64 x.im y.re)) (.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) y.re))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (+.f64 (/.f64 (.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.re (+.f64 (/.f64 (.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (log.f64 x.re)))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 y.re (+.f64 (log.f64 x.re) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 x.im y.re) y.re) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (pow.f64 x.im y.re)) (.f64 x.im x.im)))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))) y.re) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (log.f64 x.re)) y.re) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 x.re) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx y.im y.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (pow.f64 x.re y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re)))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))) (pow.f64 x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (*.f64 y.im (log.f64 x.re)))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (.f64 y.im (+.f64 (log.f64 x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 y.im (-.f64 (/.f64 (.f64 y.re (log.f64 x.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.re) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))) y.im))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.re) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (log.f64 x.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))

eval181.0ms (1.9%)

Memory: -23.5MiB live, 161.9MiB allocated; 25ms collecting garbage
Compiler: Compiled 61 069 to 4 050 computations (93.4% saved)

prune66.0ms (0.7%)

Memory

38.5MiB live, 132.6MiB allocated; 18ms collecting garbage

Pruning

39 alts after pruning (38 fresh and 1 done)

	Pruned	Kept	Total
New	652	16	668
Fresh	7	22	29
Picked	4	1	5
Done	0	0	0
Total	663	39	702

Accuracy

96.6%

Counts

702 → 39

Alt Table

Click to see full alt table

Status	Accuracy	Program
	38.4%	(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
	26.0%	(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	59.4%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	24.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
▶	48.3%	(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	48.6%	(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
	28.1%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	23.4%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	62.6%	(.f64 #s(approx (exp (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	23.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
	13.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 #s(approx (+ (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
	25.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
	37.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
	27.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 #s(approx (pow (/ -1 x.re) y.im) (+.f64 #s(literal 1 binary64) (.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	45.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
▶	47.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
	41.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
	44.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
	34.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
	36.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
	39.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
	39.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
	36.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
	39.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
	26.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(approx (* y.re (pow x.im y.re)) y.re)) (*.f64 x.im x.im)) (pow.f64 x.im y.re)))))
	15.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))) (*.f64 x.re x.re)))))))
	24.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) x.im)))))))
	28.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(literal 1 binary64)))))
	28.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (sin (+ (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
	39.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
▶	66.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
▶	55.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	24.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
	18.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (pow.f64 x.re y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))))
	37.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))))
	18.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))))
▶	20.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
	46.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
✓	28.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

Compiler

Compiled 4 977 to 2 616 computations (47.4% saved)

series244.0ms (2.5%)

Memory

-6.7MiB live, 327.3MiB allocated; 61ms collecting garbage

Counts

44 → 378

Calls

Call 1

Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(literal 1 binary64)
(pow.f64 (hypot.f64 x.im x.re) y.re)
(hypot.f64 x.im x.re)
x.im
x.re
y.re
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
(.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))
(pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(*.f64 x.re x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
(pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)
(sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
(*.f64 x.im x.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(cos.f64 (*.f64 y.im (log.f64 x.re)))
(*.f64 y.im (log.f64 x.re))
y.im
(log.f64 x.re)
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
(.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
(*.f64 (atan2.f64 x.im x.re) y.re)

Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (* y.im (log x.re)) #s(hole binary64 (* y.im (log x.re))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (neg (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (* -1 (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (* y.im (log x.re)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.re)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))))))
#s(approx (* y.im (log x.re)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 1))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/2 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/6 (* (pow (log x.re) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 1))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/2 (pow (log x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/2 (pow (log x.re) 2)) (+ (* 1/2 (pow (atan2 x.im x.re) 2)) (* y.im (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.re) 2) (atan2 x.im x.re)))))))))))))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 1))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.im 2) (pow (log x.re) 2))))))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log x.re) 2)) (* 1/24 (* (pow y.im 2) (pow (log x.re) 4))))))))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log x.re) 2)) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (pow (log x.re) 6))) (* 1/24 (pow (log x.re) 4)))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))

Calls

12 calls:

Time	Variable		Point	Expression
56.0ms	x.re	@	-inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) 1 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im x.re y.re (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (cos (* y.im (log x.re))) (* y.im (log x.re)) y.im (log x.re) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (* -1 (* y.im (atan2 x.im x.re))) -1 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re))
39.0ms	x.re	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) 1 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im x.re y.re (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (cos (* y.im (log x.re))) (* y.im (log x.re)) y.im (log x.re) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (* -1 (* y.im (atan2 x.im x.re))) -1 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re))
28.0ms	x.im	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) 1 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im x.re y.re (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (cos (* y.im (log x.re))) (* y.im (log x.re)) y.im (log x.re) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (* -1 (* y.im (atan2 x.im x.re))) -1 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re))
16.0ms	x.im	@	-inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) 1 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im x.re y.re (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (cos (* y.im (log x.re))) (* y.im (log x.re)) y.im (log x.re) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (* -1 (* y.im (atan2 x.im x.re))) -1 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re))
15.0ms	y.im	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) 1 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im x.re y.re (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (cos (* y.im (log x.re))) (* y.im (log x.re)) y.im (log x.re) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (* -1 (* y.im (atan2 x.im x.re))) -1 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re))

rewrite273.0ms (2.8%)

Memory

1.6MiB live, 417.6MiB allocated; 56ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2459	31326
0	2510	30052
0	8507	28625

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

422 → 485

Calls

Call 1

Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(literal 1 binary64)
(pow.f64 (hypot.f64 x.im x.re) y.re)
(hypot.f64 x.im x.re)
x.im
x.re
y.re
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
(.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))
(pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(*.f64 x.re x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
(pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)
(sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
(*.f64 x.im x.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(cos.f64 (*.f64 y.im (log.f64 x.re)))
(*.f64 y.im (log.f64 x.re))
y.im
(log.f64 x.re)
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
(.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (* y.im (log x.re)) #s(hole binary64 (* y.im (log x.re))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (neg (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (* -1 (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (* y.im (log x.re)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.re)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))))))
#s(approx (* y.im (log x.re)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 1))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/2 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/6 (* (pow (log x.re) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 1))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/2 (pow (log x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/2 (pow (log x.re) 2)) (+ (* 1/2 (pow (atan2 x.im x.re) 2)) (* y.im (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.re) 2) (atan2 x.im x.re)))))))))))))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 1))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.im 2) (pow (log x.re) 2))))))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log x.re) 2)) (* 1/24 (* (pow y.im 2) (pow (log x.re) 4))))))))
#s(approx (cos (* y.im (log x.re))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log x.re) 2)) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (pow (log x.re) 6))) (* 1/24 (pow (log x.re) 4)))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))

Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(literal 1 binary64)
(pow.f64 (hypot.f64 x.im x.re) y.re)
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
x.im
x.re
y.re
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
(/.f64 (+.f64 (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 (.f64 x.im x.im) (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(+.f64 (.f64 x.im x.im) (.f64 x.re x.re))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
(pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)
(pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ ( x.im x.im) (* x.re x.re)) (*.f64 x.im x.im)))) y.re))
(pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.im (log.f64 x.re))))
(cos.f64 (*.f64 y.im (log.f64 x.re)))
(*.f64 y.im (log.f64 x.re))
(log.f64 (pow.f64 x.re y.im))
y.im
(log.f64 x.re)
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (cosh.f64 (.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))
(+.f64 (cosh.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (sinh.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
(.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (sin.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (-.f64 (.f64 (.f64 (atan2.f64 x.im x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (* y.im (log x.re))) (cos.f64 (*.f64 y.im (log.f64 x.re))))
#s(approx (* y.im (log x.re)) (*.f64 y.im (log.f64 x.re)))
#s(approx (log x.re) (log.f64 x.re))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (neg (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* -1 (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (* y.im (log x.re))) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))))
#s(approx (* y.im (log x.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (log x.re) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (* y.im (log x.re))) (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))))))
#s(approx (* y.im (log x.re)) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))))
#s(approx (log x.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))))
#s(approx y.re y.re)
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re)))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 #s(literal -1 binary64) (.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) #s(literal 1 binary64))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))))
#s(approx (cos (* y.im (log x.re))) #s(literal 1 binary64))
#s(approx (cos (* y.im (log x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)))))
#s(approx (cos (* y.im (log x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.re) #s(literal 4 binary64))))))))
#s(approx (cos (* y.im (log x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 y.im y.im) (pow.f64 (log.f64 x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (log.f64 x.re) #s(literal 4 binary64)))))))))
#s(approx y.im y.im)
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))

eval107.0ms (1.1%)

Memory: -5.1MiB live, 145.3MiB allocated; 76ms collecting garbage
Compiler: Compiled 49 810 to 3 327 computations (93.3% saved)

prune82.0ms (0.9%)

Memory

-8.7MiB live, 181.2MiB allocated; 13ms collecting garbage

Pruning

40 alts after pruning (36 fresh and 4 done)

	Pruned	Kept	Total
New	507	20	527
Fresh	17	16	33
Picked	2	3	5
Done	0	1	1
Total	526	40	566

Accuracy

96.6%

Counts

566 → 40

Alt Table

Click to see full alt table

Status	Accuracy	Program
	26.0%	(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	47.6%	(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	23.0%	(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
	24.5%	(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	19.1%	(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
	48.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 #s(approx (+ ( x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
	23.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
	25.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
	27.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 #s(approx (pow (/ -1 x.re) y.im) (+.f64 #s(literal 1 binary64) (.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
✓	47.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
	39.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
	39.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
	36.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
	24.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) x.im)))))))
	28.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(literal 1 binary64)))))
	28.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (sin (+ (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
	39.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
✓	55.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	45.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
	46.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
	48.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
	38.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
	40.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
	40.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
	43.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
	37.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
	43.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
	24.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
	16.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))))
	18.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (pow.f64 x.re y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))))
	37.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))))
	18.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))))
✓	20.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
	12.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))))))
	12.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64)))))
	15.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
	48.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
	28.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))))
	46.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
✓	28.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

Compiler

Compiled 8 483 to 1 994 computations (76.5% saved)

regimes127.0ms (1.3%)

Memory

16.9MiB live, 208.4MiB allocated; 26ms collecting garbage

Counts

90 → 2

Calls

Call 1

Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(literal 1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 #s(approx (+ ( x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(approx (* y.re (pow x.im y.re)) y.re)) (*.f64 x.im x.im)) (pow.f64 x.im y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 #s(approx (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 #s(approx (+ (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(.f64 #s(approx (exp (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (sin (+ (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))) (*.f64 x.re x.re)))))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 #s(approx (pow (/ -1 x.re) y.im) (+.f64 #s(literal 1 binary64) (.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (pow.f64 x.re y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (neg.f64 (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (neg.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))

Outputs

(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))

Calls

5 calls:

27.0ms	x.re
27.0ms	y.re
25.0ms	y.im
22.0ms	x.im
20.0ms	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))

Results

Accuracy	Segments	Branch
81.0%	2	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
78.9%	1	`x.re`
78.9%	1	`x.im`
82.1%	2	`y.re`
78.9%	1	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes33.0ms (0.3%)

Memory

-6.1MiB live, 40.5MiB allocated; 2ms collecting garbage

Counts

75 → 2

Calls

Call 1

Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(literal 1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 #s(approx (+ ( x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(approx (* y.re (pow x.im y.re)) y.re)) (*.f64 x.im x.im)) (pow.f64 x.im y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 #s(approx (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 #s(approx (+ (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(.f64 #s(approx (exp (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))

Outputs

(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))

Calls

1 calls:

28.0ms

y.re

Results

Accuracy	Segments	Branch
81.6%	2	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes96.0ms (1%)

Memory

8.9MiB live, 102.8MiB allocated; 3ms collecting garbage

Counts

55 → 3

Calls

Call 1

Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(literal 1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 #s(approx (+ ( x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(approx (* y.re (pow x.im y.re)) y.re)) (*.f64 x.im x.im)) (pow.f64 x.im y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 #s(approx (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 #s(approx (+ (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(.f64 #s(approx (exp (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))

Outputs

(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (*.f64 #s(approx (cos (* y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))

Calls

5 calls:

30.0ms	y.im
20.0ms	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
14.0ms	y.re
14.0ms	x.im
13.0ms	x.re

Results

Accuracy	Segments	Branch
68.6%	2	`x.re`
78.8%	4	`y.im`
69.2%	3	`x.im`
72.4%	2	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
80.1%	3	`y.re`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes43.0ms (0.4%)

Memory

-31.5MiB live, 20.6MiB allocated; 3ms collecting garbage

Counts

51 → 3

Calls

Call 1

Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(literal 1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 #s(approx (+ ( x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(approx (* y.re (pow x.im y.re)) y.re)) (*.f64 x.im x.im)) (pow.f64 x.im y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 #s(approx (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 #s(approx (+ (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))

Outputs

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (*.f64 #s(approx (cos (* y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))

Calls

1 calls:

13.0ms

y.re

Results

Accuracy	Segments	Branch
79.2%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes15.0ms (0.2%)

Memory

19.8MiB live, 19.8MiB allocated; 0ms collecting garbage

Counts

16 → 3

Calls

Call 1

Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(literal 1 binary64)))))

Outputs

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))

Calls

3 calls:

5.0ms

y.im

5.0ms

y.re

4.0ms

(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))

Results

Accuracy	Segments	Branch
66.0%	1	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
70.5%	3	`y.im`
66.0%	1	`y.re`

Compiler

Compiled 39 to 27 computations (30.8% saved)

regimes62.0ms (0.6%)

Memory

-14.2MiB live, 33.5MiB allocated; 1ms collecting garbage

Counts

12 → 3

Calls

Call 1

Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))

Outputs

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))

Calls

5 calls:

46.0ms	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
4.0ms	x.im
4.0ms	x.re
4.0ms	y.im
4.0ms	y.re

Results

Accuracy	Segments	Branch
55.6%	1	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
65.2%	3	`y.re`
66.2%	3	`x.im`
63.1%	3	`x.re`
55.6%	1	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes5.0ms (0.1%)

Memory

11.1MiB live, 11.1MiB allocated; 0ms collecting garbage

Counts

6 → 3

Calls

Call 1

Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(approx (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))))

Outputs

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))

Calls

2 calls:

2.0ms	x.im
2.0ms	y.re

Results

Accuracy	Segments	Branch
57.8%	3	`y.re`
63.4%	3	`x.im`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes4.0ms (0%)

Memory

7.6MiB live, 7.6MiB allocated; 0ms collecting garbage

Counts

4 → 3

Calls

Call 1

Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))

Outputs

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))

Calls

2 calls:

2.0ms	x.im
2.0ms	x.re

Results

Accuracy	Segments	Branch
52.4%	3	`x.re`
61.7%	3	`x.im`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes7.0ms (0.1%)

Memory

12.2MiB live, 12.2MiB allocated; 0ms collecting garbage

Counts

3 → 3

Calls

Call 1

Inputs

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))

Outputs

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))

Calls

4 calls:

2.0ms	x.im
2.0ms	y.im
2.0ms	y.re
1.0ms	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))

Results

Accuracy	Segments	Branch
57.6%	3	`y.re`
43.3%	1	`y.im`
50.1%	4	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
52.6%	3	`x.im`

Compiler

Compiled 40 to 31 computations (22.5% saved)

regimes2.0ms (0%)

Memory

2.8MiB live, 2.8MiB allocated; 0ms collecting garbage

Counts

2 → 3

Calls

Call 1

Inputs

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))

Outputs

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))

Calls

1 calls:

1.0ms

y.re

Results

Accuracy	Segments	Branch
56.8%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes12.0ms (0.1%)

Memory

-32.3MiB live, 12.3MiB allocated; 4ms collecting garbage

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

Outputs

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

Calls

5 calls:

7.0ms	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
1.0ms	y.im
1.0ms	x.im
1.0ms	y.re
1.0ms	x.re

Results

Accuracy	Segments	Branch
28.4%	1	`y.im`
28.4%	1	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
28.4%	1	`x.re`
28.4%	1	`x.im`
28.4%	1	`y.re`

Compiler

Compiled 41 to 35 computations (14.6% saved)

bsearch40.0ms (0.4%)

Memory

41.6MiB live, 41.6MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
36.0ms	1.964254142809707e+38	2.1580820305264616e+42

Samples

23.0ms	68×	1	valid
7.0ms	60×	0	valid

Compiler

Compiled 696 to 391 computations (43.8% saved)

Precisions

Click to see histograms. Total time spent on operations: 25.0ms

ival-mult: 6.0ms (24.1% of total)

adjust: 4.0ms (16.1% of total)

ival-hypot: 4.0ms (16.1% of total)

ival-cos: 3.0ms (12.1% of total)

ival-log: 3.0ms (12.1% of total)

ival-atan2: 2.0ms (8% of total)

ival-add: 1.0ms (4% of total)

ival-exp: 1.0ms (4% of total)

ival-sub: 1.0ms (4% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch63.0ms (0.6%)

Memory

5.1MiB live, 49.0MiB allocated; 6ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
57.0ms	1.5887192495284084e+23	1.964254142809707e+38

Samples

43.0ms	101×	1	valid
7.0ms	59×	0	valid

Compiler

Compiled 980 to 573 computations (41.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 34.0ms

ival-mult: 8.0ms (23.5% of total)

adjust: 5.0ms (14.7% of total)

ival-hypot: 5.0ms (14.7% of total)

ival-cos: 4.0ms (11.8% of total)

ival-log: 4.0ms (11.8% of total)

ival-exp: 2.0ms (5.9% of total)

ival-atan2: 2.0ms (5.9% of total)

ival-add: 1.0ms (2.9% of total)

ival-sub: 1.0ms (2.9% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch81.0ms (0.8%)

Memory

-49.8MiB live, 56.1MiB allocated; 16ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
17.0ms	5.5933003788179766e-42	6.790842423105944e-42
59.0ms	-118.24931238034512	-4.892168570946419e-11

Samples

39.0ms	44×	1	valid
29.0ms	148×	0	valid

Compiler

Compiled 1 498 to 839 computations (44% saved)

Precisions

Click to see histograms. Total time spent on operations: 62.0ms

adjust: 26.0ms (42.2% of total)

ival-log: 15.0ms (24.4% of total)

ival-mult: 7.0ms (11.4% of total)

ival-hypot: 5.0ms (8.1% of total)

ival-cos: 3.0ms (4.9% of total)

ival-exp: 2.0ms (3.2% of total)

ival-atan2: 2.0ms (3.2% of total)

ival-add: 1.0ms (1.6% of total)

ival-sub: 1.0ms (1.6% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch39.0ms (0.4%)

Memory

8.0MiB live, 52.9MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
0.0ms	5.5933003788179766e-42	6.790842423105944e-42
35.0ms	-2.614116236431005e-15	-3.180037689177492e-24

Samples

15.0ms	38×	1	valid
13.0ms	106×	0	valid

Compiler

Compiled 1 459 to 771 computations (47.2% saved)

Precisions

Click to see histograms. Total time spent on operations: 24.0ms

ival-mult: 6.0ms (25.5% of total)

adjust: 4.0ms (17% of total)

ival-hypot: 4.0ms (17% of total)

ival-log: 3.0ms (12.8% of total)

ival-exp: 2.0ms (8.5% of total)

ival-atan2: 2.0ms (8.5% of total)

ival-cos: 2.0ms (8.5% of total)

ival-add: 1.0ms (4.3% of total)

ival-sub: 1.0ms (4.3% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch67.0ms (0.7%)

Memory

15.1MiB live, 111.6MiB allocated; 15ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
21.0ms	1.4898588165052612e-25	5.934066837764865e-25
41.0ms	-9.844134844659719e+44	-2.2583602163850404e+42

Samples

30.0ms	89×	1	valid
22.0ms	119×	0	valid

Compiler

Compiled 1 484 to 785 computations (47.1% saved)

Precisions

Click to see histograms. Total time spent on operations: 42.0ms

ival-hypot: 11.0ms (26.4% of total)

ival-mult: 9.0ms (21.6% of total)

adjust: 5.0ms (12% of total)

ival-log: 5.0ms (12% of total)

ival-cos: 4.0ms (9.6% of total)

ival-atan2: 3.0ms (7.2% of total)

ival-exp: 2.0ms (4.8% of total)

ival-add: 1.0ms (2.4% of total)

ival-sub: 1.0ms (2.4% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch84.0ms (0.9%)

Memory

-3.5MiB live, 89.4MiB allocated; 7ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
54.0ms	4.788967069722349e-105	3.5372224633051724e-104
25.0ms	-7.614821538995287e-68	-8.510989452930066e-69

Samples

28.0ms	76×	1	valid
14.0ms	116×	0	valid

Compiler

Compiled 1 492 to 767 computations (48.6% saved)

Precisions

Click to see histograms. Total time spent on operations: 35.0ms

ival-mult: 8.0ms (22.6% of total)

adjust: 6.0ms (16.9% of total)

ival-hypot: 5.0ms (14.1% of total)

ival-log: 5.0ms (14.1% of total)

ival-cos: 4.0ms (11.3% of total)

ival-atan2: 3.0ms (8.5% of total)

ival-exp: 2.0ms (5.6% of total)

ival-sub: 1.0ms (2.8% of total)

ival-add: 1.0ms (2.8% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch19.0ms (0.2%)

Memory

22.4MiB live, 22.4MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
17.0ms	3.7418852162430077e-56	5.476986504245098e-56
0.0ms	-4.5678285359997744e-125	-4.527072267663857e-125

Samples

10.0ms	29×	1	valid
4.0ms	35×	0	valid

Compiler

Compiled 520 to 271 computations (47.9% saved)

Precisions

Click to see histograms. Total time spent on operations: 12.0ms

ival-mult: 3.0ms (25.6% of total)

adjust: 2.0ms (17% of total)

ival-hypot: 2.0ms (17% of total)

ival-log: 2.0ms (17% of total)

ival-exp: 1.0ms (8.5% of total)

ival-cos: 1.0ms (8.5% of total)

ival-atan2: 1.0ms (8.5% of total)

ival-assert: 0.0ms (0% of total)

ival-sub: 0.0ms (0% of total)

ival-add: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch95.0ms (1%)

Memory

-13.2MiB live, 129.5MiB allocated; 15ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
29.0ms	5.9654024197306295e-108	1.7723502952210777e-106
60.0ms	-1.180564013531792e-162	-8.901527369564132e-174

Samples

38.0ms	103×	1	valid
25.0ms	169×	0	valid

Compiler

Compiled 2 066 to 1 063 computations (48.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 53.0ms

ival-mult: 14.0ms (26.3% of total)

ival-log: 11.0ms (20.7% of total)

ival-hypot: 8.0ms (15.1% of total)

adjust: 6.0ms (11.3% of total)

ival-cos: 5.0ms (9.4% of total)

ival-exp: 3.0ms (5.6% of total)

ival-atan2: 3.0ms (5.6% of total)

ival-sub: 2.0ms (3.8% of total)

ival-add: 2.0ms (3.8% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch52.0ms (0.5%)

Memory

9.2MiB live, 99.7MiB allocated; 10ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
40.0ms	2.3126085954352763e-6	18876217.60774494
8.0ms	-2.614116236431005e-15	-3.180037689177492e-24

Samples

24.0ms	154×	0	valid
15.0ms	38×	1	valid

Compiler

Compiled 2 244 to 1 144 computations (49% saved)

Precisions

Click to see histograms. Total time spent on operations: 33.0ms

ival-mult: 7.0ms (21.5% of total)

ival-log: 7.0ms (21.5% of total)

ival-cos: 5.0ms (15.4% of total)

ival-hypot: 4.0ms (12.3% of total)

adjust: 2.0ms (6.2% of total)

ival-exp: 2.0ms (6.2% of total)

ival-atan2: 2.0ms (6.2% of total)

ival-add: 1.0ms (3.1% of total)

ival-sub: 1.0ms (3.1% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch45.0ms (0.5%)

Memory

-19.1MiB live, 85.5MiB allocated; 10ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
41.0ms	2.3126085954352763e-6	18876217.60774494
1.0ms	-2.614116236431005e-15	-3.180037689177492e-24

Samples

21.0ms	105×	0	valid
14.0ms	39×	1	valid

Compiler

Compiled 2 244 to 1 144 computations (49% saved)

Precisions

Click to see histograms. Total time spent on operations: 29.0ms

ival-mult: 10.0ms (34% of total)

ival-cos: 5.0ms (17% of total)

ival-hypot: 4.0ms (13.6% of total)

ival-log: 3.0ms (10.2% of total)

adjust: 2.0ms (6.8% of total)

ival-exp: 2.0ms (6.8% of total)

ival-atan2: 2.0ms (6.8% of total)

ival-add: 1.0ms (3.4% of total)

ival-sub: 1.0ms (3.4% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

simplify57.0ms (0.6%)

Memory

22.4MiB live, 68.8MiB allocated; 5ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	153	1605
1	243	1579
2	432	1579
3	825	1579
4	1829	1579

Stop Event

1×	node limit

Calls

Call 1

Inputs
(if (<=.f64 y.re #s(literal 104999999999999997749587110217707216175104 binary64)) (.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))))
(if (<=.f64 y.re #s(literal 6799999999999999860495871633260544 binary64)) (.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.re (atan2.f64 x.im x.re))))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))))
(if (<=.f64 y.re #s(literal -6456360425798343/2305843009213693952 binary64)) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.re #s(literal 2550072580000839/392318858461667547739736838950479151006397215279002157056 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
(if (<=.f64 y.re #s(literal -2535301200456459/1267650600228229401496703205376 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (if (<=.f64 y.re #s(literal 2550072580000839/392318858461667547739736838950479151006397215279002157056 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
(if (<=.f64 y.im #s(literal -780000000000000052960986458537229078765764608 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 x.re x.re))) y.re))) (if (<=.f64 y.im #s(literal 3157820365026309/5444517870735015415413993718908291383296 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))))
(if (<=.f64 x.im #s(literal -4613838619036107/485667223056432267729865476705879726660601709763034880312953102434726071301302124544 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) x.im)) y.re))) (if (<=.f64 x.im #s(literal 451893728665209/40347654345107946713373737062547060536401653012956617387979052445947619094013143666088208645002153616185987062074179584 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 x.re x.re))) y.re))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))))
(if (<=.f64 x.im #s(literal -8669406679649515/190536410541747572716161940294993060653600960856016305594430966774009505543198585212421026798308836130360530463953040948208494609331560382464 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) x.im)) y.re))) (if (<=.f64 x.im #s(literal 2263772801747305/55213970774324510299478046898216203619608871777363092441300193790394368 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) x.re)) y.re))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))))
(if (<=.f64 x.im #s(literal -6613645304475533/17404329748619824289860426352311291980336107281679382059399385520550823849520406290076876874227033232798165548605325345270876711736203910820971150664223534348495463082734165001231667298304 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) x.im)) y.re))) (if (<=.f64 x.im #s(literal 5949503719112237/330527984395124299475957654016385519914202341482140609642324397637202895618155672912594605219857642423795606012511679152128 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))))
(if (<=.f64 y.re #s(literal -6591783121186793/2535301200456458802993406410752 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re))) (if (<=.f64 y.re #s(literal 7566047373982433/18014398509481984 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))))
(if (<=.f64 y.re #s(literal -6591783121186793/2535301200456458802993406410752 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re))) (if (<=.f64 y.re #s(literal 3996944669291315/562949953421312 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

Outputs
(if (<=.f64 y.re #s(literal 104999999999999997749587110217707216175104 binary64)) (.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))))
(if (<=.f64 y.re #s(literal 6799999999999999860495871633260544 binary64)) (.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.re (atan2.f64 x.im x.re))))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))))
(if (<=.f64 y.re #s(literal -6456360425798343/2305843009213693952 binary64)) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.re #s(literal 2550072580000839/392318858461667547739736838950479151006397215279002157056 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
(if (<=.f64 y.re #s(literal -6456360425798343/2305843009213693952 binary64)) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.re #s(literal 2550072580000839/392318858461667547739736838950479151006397215279002157056 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
(if (<=.f64 y.re #s(literal -2535301200456459/1267650600228229401496703205376 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (if (<=.f64 y.re #s(literal 2550072580000839/392318858461667547739736838950479151006397215279002157056 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
(if (or (<=.f64 y.re #s(literal -2535301200456459/1267650600228229401496703205376 binary64)) (not (<=.f64 y.re #s(literal 2550072580000839/392318858461667547739736838950479151006397215279002157056 binary64)))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 #s(approx (cos ( y.im (log x.re))) #s(literal 1 binary64)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))
(if (<=.f64 y.im #s(literal -780000000000000052960986458537229078765764608 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 x.re x.re))) y.re))) (if (<=.f64 y.im #s(literal 3157820365026309/5444517870735015415413993718908291383296 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))))
(if (<=.f64 x.im #s(literal -4613838619036107/485667223056432267729865476705879726660601709763034880312953102434726071301302124544 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) x.im)) y.re))) (if (<=.f64 x.im #s(literal 451893728665209/40347654345107946713373737062547060536401653012956617387979052445947619094013143666088208645002153616185987062074179584 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 x.re x.re))) y.re))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))))
(if (<=.f64 x.im #s(literal -4613838619036107/485667223056432267729865476705879726660601709763034880312953102434726071301302124544 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 x.im)) y.re))) (if (<=.f64 x.im #s(literal 451893728665209/40347654345107946713373737062547060536401653012956617387979052445947619094013143666088208645002153616185987062074179584 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 x.re x.re))) y.re))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))))
(if (<=.f64 x.im #s(literal -8669406679649515/190536410541747572716161940294993060653600960856016305594430966774009505543198585212421026798308836130360530463953040948208494609331560382464 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) x.im)) y.re))) (if (<=.f64 x.im #s(literal 2263772801747305/55213970774324510299478046898216203619608871777363092441300193790394368 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) x.re)) y.re))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))))
(if (<=.f64 x.im #s(literal -8669406679649515/190536410541747572716161940294993060653600960856016305594430966774009505543198585212421026798308836130360530463953040948208494609331560382464 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 x.im)) y.re))) (if (<=.f64 x.im #s(literal 2263772801747305/55213970774324510299478046898216203619608871777363092441300193790394368 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 x.re)) y.re))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))))
(if (<=.f64 x.im #s(literal -6613645304475533/17404329748619824289860426352311291980336107281679382059399385520550823849520406290076876874227033232798165548605325345270876711736203910820971150664223534348495463082734165001231667298304 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) x.im)) y.re))) (if (<=.f64 x.im #s(literal 5949503719112237/330527984395124299475957654016385519914202341482140609642324397637202895618155672912594605219857642423795606012511679152128 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))))
(if (<=.f64 x.im #s(literal -6613645304475533/17404329748619824289860426352311291980336107281679382059399385520550823849520406290076876874227033232798165548605325345270876711736203910820971150664223534348495463082734165001231667298304 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 x.im)) y.re))) (if (<=.f64 x.im #s(literal 5949503719112237/330527984395124299475957654016385519914202341482140609642324397637202895618155672912594605219857642423795606012511679152128 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))))
(if (<=.f64 y.re #s(literal -6591783121186793/2535301200456458802993406410752 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re))) (if (<=.f64 y.re #s(literal 7566047373982433/18014398509481984 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))))
(if (<=.f64 y.re #s(literal -6591783121186793/2535301200456458802993406410752 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re))) (if (<=.f64 y.re #s(literal 3996944669291315/562949953421312 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))))
(if (or (<=.f64 y.re #s(literal -6591783121186793/2535301200456458802993406410752 binary64)) (not (<=.f64 y.re #s(literal 3996944669291315/562949953421312 binary64)))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

derivations367.0ms (3.8%)

Memory

-26.1MiB live, 299.1MiB allocated; 92ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 605 to 155 computations (90.3% saved)

preprocess83.0ms (0.9%)

Memory: 23.7MiB live, 69.8MiB allocated; 5ms collecting garbage
Compiler: Compiled 3 284 to 348 computations (89.4% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

start0.0ms (0%)

analyze613.0ms (6.3%)

sample2.6s (27.3%)

explain432.0ms (4.5%)

preprocess199.0ms (2.1%)

eval0.0ms (0%)

prune1.0ms (0%)

series251.0ms (2.6%)

rewrite300.0ms (3.1%)

eval64.0ms (0.7%)

prune76.0ms (0.8%)

series1.3s (13.5%)

rewrite384.0ms (4%)

eval230.0ms (2.4%)

prune77.0ms (0.8%)

series287.0ms (3%)

rewrite365.0ms (3.8%)

eval181.0ms (1.9%)

prune66.0ms (0.7%)

series244.0ms (2.5%)

rewrite273.0ms (2.8%)

eval107.0ms (1.1%)

prune82.0ms (0.9%)

regimes127.0ms (1.3%)

regimes33.0ms (0.3%)

regimes96.0ms (1%)

regimes43.0ms (0.4%)

regimes15.0ms (0.2%)

regimes62.0ms (0.6%)

regimes5.0ms (0.1%)

regimes4.0ms (0%)

regimes7.0ms (0.1%)

regimes2.0ms (0%)

regimes12.0ms (0.1%)

bsearch40.0ms (0.4%)

bsearch63.0ms (0.6%)

bsearch81.0ms (0.8%)

bsearch39.0ms (0.4%)

bsearch67.0ms (0.7%)

bsearch84.0ms (0.9%)

bsearch19.0ms (0.2%)

bsearch95.0ms (1%)

bsearch52.0ms (0.5%)

bsearch45.0ms (0.5%)

simplify57.0ms (0.6%)

derivations367.0ms (3.8%)

preprocess83.0ms (0.9%)

end0.0ms (0%)

Profiling