Metrics for powComplex, real part

start0.0ms (0%)

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

analyze580.0ms (6.1%)

Memory

53.2MiB live, 426.8MiB allocated; 570ms 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%)

Memory

69.9MiB live, 2 832.1MiB allocated; 622ms collecting garbage

Samples

1.3s	2 981×	1	valid
811.0ms	5 275×	0	valid

Precisions

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

ival-mult: 498.0ms (29.4% of total)

ival-hypot: 327.0ms (19.3% of total)

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

adjust: 175.0ms (10.3% of total)

ival-cos: 168.0ms (9.9% of total)

ival-atan2: 120.0ms (7.1% of total)

ival-exp: 80.0ms (4.7% of total)

ival-sub: 66.0ms (3.9% of total)

ival-add: 50.0ms (3% of total)

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

Bogosity

explain412.0ms (4.3%)

Memory

-15.3MiB live, 566.0MiB allocated; 36ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
186	0	-	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)))`
131	0	-	4	(6.060605594265526e-301 2.1971237340537285e-160 -1.5105662831594418e-154 -1.0726821554332333e-132)	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`
6	0	-	0	-	`(*.f64 (atan2.f64 x.im x.re) y.re)`
4	1	(1.6021140241989178e+155 1.7378162518052773e-273 -1.90923999014109e+198 -2.6998792472064056e+104)	0	-	`(*.f64 (atan2.f64 x.im x.re) y.im)`
0	0	-	0	-	`(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)`
0	0	-	0	-	`(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))`
0	0	-	0	-	`(atan2.f64 x.im x.re)`
0	0	-	0	-	`(*.f64 x.re x.re)`
0	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	-	0	-	`x.re`
0	0	-	0	-	`x.im`
0	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	-	0	-	`(*.f64 x.im x.im)`
0	0	-	0	-	`(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)`
0	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	-	0	-	`y.re`
0	0	-	0	-	`y.im`
0	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	-	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	185	0
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`	oflow-rescue	119	0
↳	`(*.f64 x.re x.re)`	overflow	71
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	overflow	119
↳	`(*.f64 x.im x.im)`	overflow	69
`*.f64`	`(*.f64 (atan2.f64 x.im x.re) y.re)`	*nu**	2	0
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`	uflow-rescue	2	0
↳	`(*.f64 x.re x.re)`	underflow	60
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	underflow	8
↳	`(*.f64 x.im x.im)`	underflow	57
`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	1	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	1
↳	`(*.f64 x.re x.re)`	overflow	71
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	overflow	119
↳	`(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)`	overflow	1
↳	`(*.f64 x.im x.im)`	overflow	69
`*.f64`	`(*.f64 (atan2.f64 x.im x.re) y.im)`	*nu**	1	0

Confusion

	Predicted +	Predicted -
+	154	1
-	64	37

Precision

0.7064220183486238

Recall

0.9935483870967742

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	154	0	1
-	64	1	36

Precision?

0.7031963470319634

Recall?

0.9935483870967742

Freqs

test

number	freq
0	38
1	127
2	90
3	1

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

182.0ms	370×	1	valid
22.0ms	142×	0	valid

Compiler

Compiled 393 to 61 computations (84.5% saved)

Precisions

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

ival-mult: 44.0ms (27.1% of total)

ival-cos: 36.0ms (22.1% of total)

adjust: 22.0ms (13.5% of total)

ival-hypot: 17.0ms (10.5% of total)

ival-log: 17.0ms (10.5% of total)

ival-atan2: 10.0ms (6.1% of total)

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

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

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

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

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

preprocess191.0ms (2%)

Memory

-2.1MiB live, 181.2MiB allocated; 24ms 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.8MiB live, 1.8MiB allocated; 0ms collecting garbage

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	39.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 (+.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

▶

39.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 (+.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)

series236.0ms (2.5%)

Memory

24.4MiB live, 346.7MiB allocated; 84ms 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
54.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))
30.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))
29.0ms	y.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))
26.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	y.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))

rewrite242.0ms (2.6%)

Memory

-30.2MiB live, 305.8MiB allocated; 79ms 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))))))

eval96.0ms (1%)

Memory: 24.5MiB live, 112.7MiB allocated; 12ms collecting garbage
Compiler: Compiled 31 786 to 2 820 computations (91.1% saved)

prune73.0ms (0.8%)

Memory

-25.8MiB live, 76.7MiB allocated; 11ms collecting garbage

Pruning

23 alts after pruning (23 fresh and 0 done)

	Pruned	Kept	Total
New	433	23	456
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	434	23	457

Accuracy

96.7%

Counts

457 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	79.3%	(.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))))
	61.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))) (-.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)))))
	60.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))) (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)))))
	19.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 #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))))
	18.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 #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.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	29.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 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	17.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 (+.f64 (.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.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
▶	14.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 (+.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.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	59.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 #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)))))
	35.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 #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)))))
	59.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))) #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)))))))))
	50.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))) #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)))))))))
	19.5%	(.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)))))))
	31.4%	(.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))))
▶	9.1%	(.f64 (exp.f64 (-.f64 (.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.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)))))) 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))))
	29.7%	(.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))))
	28.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))))
	53.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))) (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))))
	51.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)))) (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))))
	33.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 (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))))))
▶	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 (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))))))
▶	57.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 (hypot.f64 x.im x.re) y.re)))
	25.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 (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 2 932 to 1 484 computations (49.4% saved)

series391.0ms (4.1%)

Memory

36.4MiB live, 549.1MiB allocated; 110ms collecting garbage

Counts

69 → 554

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.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 (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)))))
(cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.im)
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.im))
(*.f64 y.im (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))) (cos.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.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)
(*.f64 x.im x.im)
(*.f64 (atan2.f64 x.im x.re) y.im)
(cos.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.im) (.f64 (atan2.f64 x.im x.re) y.re)))
(+.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.im) (.f64 (atan2.f64 x.im x.re) y.re))
(.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.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)))))
(-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im 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 (exp.f64 (-.f64 (.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.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)))))) 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)))) (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)))))) 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)))) (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)))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(.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.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)))))) y.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))))))
(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(literal -1 binary64)
(log.f64 (/.f64 #s(literal -1 binary64) x.re))
(/.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(literal -1/4 binary64)
(/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))
(pow.f64 x.im #s(literal 4 binary64))
#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(literal 1/2 binary64)
(/.f64 (.f64 x.im x.im) (.f64 x.re 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)))
(+.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)

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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.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 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.im)) (* 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) (* (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 (+ (* 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 (* (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 (- (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1/4 (/ (pow x.im 4) (pow x.re 4)))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (/ (+ (* -1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 2) (pow x.re 2)))) (pow x.re 4))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (/ (+ (* -1/4 (pow x.im 4)) (* (pow x.re 2) (+ (* -1 (* (pow x.re 2) (+ (log -1) (* -1 (log x.re))))) (* 1/2 (pow x.im 2))))) (pow x.re 4))))
#s(approx (log (/ -1 x.re)) #s(hole binary64 (+ (log -1) (* -1 (log x.re)))))
#s(approx (/ -1 x.re) #s(hole binary64 (/ -1 x.re)))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1/4 (/ (pow x.im 4) (pow x.re 4)))))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (/ (+ (* -1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 2) (pow x.re 2)))) (pow x.re 4))))
#s(approx (/ (pow x.im 4) (pow x.re 4)) #s(hole binary64 (/ (pow x.im 4) (pow x.re 4))))
#s(approx (pow x.re 4) #s(hole binary64 (pow x.re 4)))
#s(approx (* 1/2 (/ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* 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.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))) (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 (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 (+ (* 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 (* (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 (- (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (+ (log -1) (log (/ 1 x.re))))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (+ (log -1) (log (/ 1 x.re)))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (+ (log -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 (/ -1 x.re)) #s(hole binary64 (+ (log -1) (log (/ 1 x.re)))))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (/ (+ (* -1/4 (/ (pow x.im 4) (pow x.re 2))) (* 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) (* (neg (atan2 x.im x.re)) y.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 (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #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 (/ -1 x.re)) #s(hole binary64 (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 (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#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 (* 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 (- (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (log (/ -1 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 (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))
#s(approx (pow x.im 4) #s(hole binary64 (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 (+ (* -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 (* (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(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 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#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 (+ (* 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 (* (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 (- (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (pow x.im 4) (- (* 1/2 (/ 1 (* (pow x.im 2) (pow x.re 2)))) (* 1/4 (/ 1 (pow x.re 4)))))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (pow x.im 4) (- (+ (* -1 (/ (log (/ -1 x.re)) (pow x.im 4))) (/ 1/2 (* (pow x.im 2) (pow x.re 2)))) (* 1/4 (/ 1 (pow x.re 4)))))))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* (pow x.im 4) (- (* 1/2 (/ 1 (* (pow x.im 2) (pow x.re 2)))) (* 1/4 (/ 1 (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 (+ (* -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 (* (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(hole binary64 (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#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)))) 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 (- (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (log x.im))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (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(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im))))) (* (cos (* y.im (log x.im))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (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(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))) (* (cos (* y.im (log x.im))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (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(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))) (* (cos (* y.im (log x.im))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* -1 (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (exp (- (* y.re (log x.im)) (* 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.im)) (* 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.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* 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.im) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* 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.im) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (- (* y.re (log x.im)) (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.im))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.im) (* -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 (+ (* (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.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.im)) (/ (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (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(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (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(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (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(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/2 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/6 (* (pow (log x.im) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* 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.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* 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.im) 2)))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.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 x.im) 2))) (* 1/6 (* y.im (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -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) (* (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 (+ (* (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.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* 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.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.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.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.im)) 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)))))))

Calls

12 calls:

Time	Variable		Point	Expression
62.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (* 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)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* 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)))) (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* 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)))) (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)))) (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) -1 (log (/ -1 x.re)) (/ -1 x.re) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) -1/4 (/ (pow x.im 4) (pow x.re 4)) (pow x.im 4) 4 (pow x.re 4) (* 1/2 (/ (* x.im x.im) (* x.re x.re))) 1/2 (/ (* x.im x.im) (* x.re x.re)) (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))
54.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (* 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)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* 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)))) (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* 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)))) (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)))) (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) -1 (log (/ -1 x.re)) (/ -1 x.re) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) -1/4 (/ (pow x.im 4) (pow x.re 4)) (pow x.im 4) 4 (pow x.re 4) (* 1/2 (/ (* x.im x.im) (* x.re x.re))) 1/2 (/ (* x.im x.im) (* x.re x.re)) (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))
50.0ms	y.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (* 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)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* 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)))) (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* 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)))) (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)))) (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) -1 (log (/ -1 x.re)) (/ -1 x.re) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) -1/4 (/ (pow x.im 4) (pow x.re 4)) (pow x.im 4) 4 (pow x.re 4) (* 1/2 (/ (* x.im x.im) (* x.re x.re))) 1/2 (/ (* x.im x.im) (* x.re x.re)) (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))
32.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (* 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)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* 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)))) (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* 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)))) (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)))) (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) -1 (log (/ -1 x.re)) (/ -1 x.re) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) -1/4 (/ (pow x.im 4) (pow x.re 4)) (pow x.im 4) 4 (pow x.re 4) (* 1/2 (/ (* x.im x.im) (* x.re x.re))) 1/2 (/ (* x.im x.im) (* x.re x.re)) (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))
31.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (* 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)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* 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)))) (- (log x.im) (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* 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)))) (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)))) (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) -1 (log (/ -1 x.re)) (/ -1 x.re) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) -1/4 (/ (pow x.im 4) (pow x.re 4)) (pow x.im 4) 4 (pow x.re 4) (* 1/2 (/ (* x.im x.im) (* x.re x.re))) 1/2 (/ (* x.im x.im) (* x.re x.re)) (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))

rewrite388.0ms (4.1%)

Memory

21.4MiB live, 386.7MiB allocated; 60ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2891	38592
0	3004	37107
0	9715	35657

Stop Event

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

Counts

623 → 713

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.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 (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)))))
(cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.im)
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.im))
(*.f64 y.im (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))) (cos.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.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)
(*.f64 x.im x.im)
(*.f64 (atan2.f64 x.im x.re) y.im)
(cos.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.im) (.f64 (atan2.f64 x.im x.re) y.re)))
(+.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.im) (.f64 (atan2.f64 x.im x.re) y.re))
(.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.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)))))
(-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im 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 (exp.f64 (-.f64 (.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.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)))))) 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)))) (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)))))) 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)))) (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)))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(.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.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)))))) y.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))))))
(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(literal -1 binary64)
(log.f64 (/.f64 #s(literal -1 binary64) x.re))
(/.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(literal -1/4 binary64)
(/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))
(pow.f64 x.im #s(literal 4 binary64))
#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(literal 1/2 binary64)
(/.f64 (.f64 x.im x.im) (.f64 x.re 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)))
(+.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)
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.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 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.im)) (* 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) (* (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 (+ (* 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 (* (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 (- (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1/4 (/ (pow x.im 4) (pow x.re 4)))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (/ (+ (* -1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 2) (pow x.re 2)))) (pow x.re 4))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (/ (+ (* -1/4 (pow x.im 4)) (* (pow x.re 2) (+ (* -1 (* (pow x.re 2) (+ (log -1) (* -1 (log x.re))))) (* 1/2 (pow x.im 2))))) (pow x.re 4))))
#s(approx (log (/ -1 x.re)) #s(hole binary64 (+ (log -1) (* -1 (log x.re)))))
#s(approx (/ -1 x.re) #s(hole binary64 (/ -1 x.re)))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1/4 (/ (pow x.im 4) (pow x.re 4)))))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (/ (+ (* -1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 2) (pow x.re 2)))) (pow x.re 4))))
#s(approx (/ (pow x.im 4) (pow x.re 4)) #s(hole binary64 (/ (pow x.im 4) (pow x.re 4))))
#s(approx (pow x.re 4) #s(hole binary64 (pow x.re 4)))
#s(approx (* 1/2 (/ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* 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.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))) (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 (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 (+ (* 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 (* (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 (- (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (+ (log -1) (log (/ 1 x.re))))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (+ (log -1) (log (/ 1 x.re)))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (+ (log -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 (/ -1 x.re)) #s(hole binary64 (+ (log -1) (log (/ 1 x.re)))))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (/ (+ (* -1/4 (/ (pow x.im 4) (pow x.re 2))) (* 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) (* (neg (atan2 x.im x.re)) y.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 (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #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 (/ -1 x.re)) #s(hole binary64 (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 (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#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 (* 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 (- (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (log (/ -1 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 (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))
#s(approx (pow x.im 4) #s(hole binary64 (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 (+ (* -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 (* (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(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 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#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 (+ (* 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 (* (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 (- (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (pow x.im 4) (- (* 1/2 (/ 1 (* (pow x.im 2) (pow x.re 2)))) (* 1/4 (/ 1 (pow x.re 4)))))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (pow x.im 4) (- (+ (* -1 (/ (log (/ -1 x.re)) (pow x.im 4))) (/ 1/2 (* (pow x.im 2) (pow x.re 2)))) (* 1/4 (/ 1 (pow x.re 4)))))))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* (pow x.im 4) (- (* 1/2 (/ 1 (* (pow x.im 2) (pow x.re 2)))) (* 1/4 (/ 1 (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 (+ (* -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 (* (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(hole binary64 (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#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)))) 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 (- (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (log x.im))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (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(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im))))) (* (cos (* y.im (log x.im))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (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(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))) (* (cos (* y.im (log x.im))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (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(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))) (* (cos (* y.im (log x.im))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* -1 (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (exp (- (* y.re (log x.im)) (* 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.im)) (* 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.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* 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.im) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* 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.im) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (- (* y.re (log x.im)) (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.im))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.im) (* -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 (+ (* (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.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.im)) (/ (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (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(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (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(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (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(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/2 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/6 (* (pow (log x.im) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* 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.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* 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.im) 2)))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.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 x.im) 2))) (* 1/6 (* y.im (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -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) (* (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 (+ (* (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.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* 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.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.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.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.im)) 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)))))))

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.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 (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)))))
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.im) (*.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.im))) (cos.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (.f64 y.im (log.f64 x.im)) #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.im)) (.f64 y.im (log.f64 x.im)) (-.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.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.im)
(/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (exp.f64 (.f64 y.im (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 (cosh.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))
(-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.im))
(log.f64 (pow.f64 x.im y.re))
(*.f64 y.im (atan2.f64 x.im x.re))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.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)))) (-.f64 (log.f64 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 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.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 (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 (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))
(*.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 #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.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.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.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (sin.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.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.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.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.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.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.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.im) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.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.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.im) (-.f64 (.f64 (.f64 (atan2.f64 x.im x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.re)) (.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.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.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.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.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.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(.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.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)))))
(-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re 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 (exp.f64 (-.f64 (.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.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.re) (/.f64 x.im x.re)))))) 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)))) (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.re) (/.f64 x.im x.re)))))) 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)))) (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.re) (/.f64 x.im x.re)))))) 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)))) (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.re) (/.f64 x.im x.re)))))) 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)))) (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.re) (/.f64 x.im x.re)))))) 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)))) (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.re) (/.f64 x.im x.re)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(.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.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.re) (/.f64 x.im x.re)))))) y.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.re) (/.f64 x.im x.re))))))
(/.f64 (+.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.f64 (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.re) (/.f64 x.im x.re)))) #s(literal 3 binary64))) (fma.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (-.f64 (.f64 (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.re) (/.f64 x.im 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.re) (/.f64 x.im x.re))))) (.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (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.re) (/.f64 x.im x.re))))))))
(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.re) (/.f64 x.im x.re)))))
(+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (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.re) (/.f64 x.im x.re)))))
#s(literal -1 binary64)
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))
(log.f64 (/.f64 #s(literal -1 binary64) x.re))
(/.f64 #s(literal 1 binary64) (neg.f64 x.re))
(/.f64 #s(literal -1 binary64) x.re)
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.im x.re) (/.f64 x.im x.re))) #s(literal 3 binary64))) (fma.f64 (.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/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.im x.re) (/.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.im x.re) (/.f64 x.im x.re)))) (.f64 (.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.re) (/.f64 x.im 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.re) (/.f64 x.im x.re))))
(+.f64 (.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.re) (/.f64 x.im x.re))))
#s(literal -1/4 binary64)
(/.f64 (neg.f64 (pow.f64 x.im #s(literal 4 binary64))) (neg.f64 (pow.f64 x.re #s(literal 4 binary64))))
(/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))
(pow.f64 x.im #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 4 binary64)))
#s(literal 4 binary64)
(pow.f64 x.re #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 4 binary64)))
(.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.im x.re) (/.f64 x.im x.re)))
#s(literal 1/2 binary64)
(*.f64 (/.f64 x.im x.re) (/.f64 x.im x.re))
(/.f64 (neg.f64 (.f64 x.im x.im)) (neg.f64 (.f64 x.re x.re)))
(/.f64 (.f64 x.im x.im) (.f64 x.re 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))))
(-.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)
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.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 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 y.re (log.f64 x.im)) (.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) (* (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 (+ (* 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 (* (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 (- (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 x.re x.re) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im))))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (log (/ -1 x.re)) (+.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 (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (/ (pow x.im 4) (pow x.re 4)) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (pow x.re 4) (pow.f64 x.re #s(literal 4 binary64)))
#s(approx (* 1/2 (/ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.im x.re) (/.f64 x.im x.re))))
#s(approx (/ (* x.im x.im) (* x.re x.re)) (*.f64 (/.f64 x.im x.re) (/.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.re) (/.f64 x.im 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.re) (/.f64 x.im 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.re) (/.f64 x.im 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.re) (/.f64 x.im 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.re) (/.f64 x.im 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.re) (/.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 #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.re) (/.f64 x.im 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.re) (/.f64 x.im 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.re) (/.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 #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 (+ (* 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.re) (/.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 (- (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re)))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.im x.re) (/.f64 x.im x.re)))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (+.f64 (log.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.re) (/.f64 x.im x.re))))))
#s(approx (log (/ -1 x.re)) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.re))))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.im x.re) (/.f64 x.im x.re))))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.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) (* (neg (atan2 x.im x.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.re) (/.f64 x.im 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.re) (/.f64 x.im 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.re) (/.f64 x.im 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.re) (/.f64 x.im 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.re) (/.f64 x.im 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.re) (/.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 #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.re) (/.f64 x.im 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.re) (/.f64 x.im 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.re) (/.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 #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))) (+.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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.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)))))
#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.re) 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 (.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 (.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))))))
#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.re) 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 (.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 (/.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)))) (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) (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)))))))
#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.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)) (-.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)))) 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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) (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.re) (/.f64 x.im x.re)))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) (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.re) (/.f64 x.im x.re))))))
#s(approx (log (/ -1 x.re)) (log.f64 (/.f64 #s(literal -1 binary64) 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.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.re) (/.f64 x.im 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 (log x.im) (log.f64 x.im))
#s(approx (* y.re (log x.im)) (*.f64 y.re (log.f64 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 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 (* 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 (- (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re 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 (pow x.im 4) (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)))) (.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 (* (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))))) (.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 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.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 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.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 x.im) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (-.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 (* y.re (log x.im)) (.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) (* (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 (+ (* 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 (* (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 (- (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 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 x.im x.re) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))))
#s(approx (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))))
#s(approx (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (* x.im x.im) (* x.re x.re)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 x.im x.re) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 #s(literal 1/4 binary64) (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)))) (.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 (* (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))))) (.f64 (cos.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #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.im) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* 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.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* 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.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#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 (exp (- (* y.re (log x.im)) (* 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.im) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* 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.im) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.im)) (*.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) (* (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 (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 (- (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (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))))) (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.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im)))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (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))))) (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.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 x.im) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.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 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (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))))) (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.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 x.im) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.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 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (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.im) #s(literal 2 binary64)) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #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.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (cos.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 #s(literal -1 binary64) (.f64 y.re (.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.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 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im)))
#s(approx (exp (- (* y.re (log x.im)) (* 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.im)) (* 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.im)))))
#s(approx (exp (- (* y.re (log x.im)) (* 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.im) #s(literal 2 binary64)))) (.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* 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.im) #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.im) #s(literal 2 binary64))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (- (* y.re (log x.im)) (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (.f64 y.re (+.f64 (/.f64 (.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (log.f64 x.im)))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (.f64 y.re (+.f64 (log.f64 x.im) (.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 (+ (* (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.im)) (* 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.im)) y.re) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (/.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (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))))) (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.im y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (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))))) (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.im y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im 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.im) #s(literal 2 binary64)) (pow.f64 x.im 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.im y.re))) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (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))))) (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.im y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im 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.im) #s(literal 2 binary64)) (pow.f64 x.im 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.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 x.im) (.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.im 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.im y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im 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.im) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* 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.im)) (* 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.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.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 #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.im) #s(literal 2 binary64))))) (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.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 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (exp (- (* y.re (log x.im)) (* 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.im y.re))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* 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.im 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.im y.re))))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* 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.im 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.im y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (- (* y.re (log x.im)) (* 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.im))))
#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 (+ (* (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.im)) (* y.re (atan2 x.im x.re))) (.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (.f64 y.im (-.f64 (/.f64 (.f64 y.re (log.f64 x.im)) 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 (+ (* (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.im)) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* y.re (log x.im)) (* 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.im)) 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))))))

eval550.0ms (5.8%)

Memory: -66.9MiB live, 227.3MiB allocated; 777ms collecting garbage
Compiler: Compiled 73 902 to 5 130 computations (93.1% saved)

prune68.0ms (0.7%)

Memory

21.8MiB live, 166.6MiB allocated; 26ms collecting garbage

Pruning

33 alts after pruning (33 fresh and 0 done)

	Pruned	Kept	Total
New	921	26	947
Fresh	11	7	18
Picked	5	0	5
Done	0	0	0
Total	937	33	970

Accuracy

97.9%

Counts

970 → 33

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	80.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))) (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)))))
	43.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.re))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
	38.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 (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))))
	78.6%	(.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)))))
	60.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))) (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)))))
	59.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 #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)))))
	31.4%	(.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))))
▶	56.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))))
	29.7%	(.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))))
	28.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))))
	57.2%	(.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))))
	51.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)))) (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))))
	34.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 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.im) (.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.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
	23.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 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.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)))) (.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)))
	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 (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)))
	42.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 #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)))
	41.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))) (.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.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 #s(literal -1 binary64) x.re)) y.re)))
	35.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
	33.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))) x.re) y.re)))
	37.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
▶	20.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))) #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)))))
	20.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))) #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)))))
	26.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) #s(literal 1 binary64))))
	25.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 (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)))))
	35.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 #s(approx (+ ( y.im (log x.im)) (* 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.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))
	38.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.im (log x.im)) (* 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.im) (sin.f64 (.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))))))
	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 #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)))
	63.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)))
	30.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)))) #s(approx (* (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))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
	42.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(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)))))
▶	26.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)) #s(literal 1 binary64)))

Compiler

Compiled 3 812 to 2 000 computations (47.5% saved)

series208.0ms (2.2%)

Memory

6.6MiB live, 382.6MiB allocated; 51ms collecting garbage

Counts

47 → 485

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))) (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)))))
(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
(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 (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)))
(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)
(/.f64 (PI.f64) #s(literal 2 binary64))
(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)))) #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)))
(*.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)
(.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)
(*.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)))

Outputs
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* 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 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* 1/2 (PI)) (+ (* 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)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* 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 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* 1/2 (PI)) (+ (* 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)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* 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))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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) (* (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 (+ (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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 (* -1 (* 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 (cos (+ (* (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im 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/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (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.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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 (PI)) (+ (* 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)))) (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im 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/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (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.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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 (PI)) (+ (* 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)))) (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* 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 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* 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)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* 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 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* 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)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* 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))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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) (* (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 (+ (* 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 (cos (+ (* (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (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/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (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.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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 (PI)) (+ (* 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)))) (* 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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (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/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (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.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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 (PI)) (+ (* 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)))) (* 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 (+ (* -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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (* y.im (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 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (cos (+ (* 1/2 (PI)) (* 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)))) (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (* y.im (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 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* 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) 3)))) (+ (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* 1/2 (* (cos (+ (* 1/2 (PI)) (* 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) (atan2 x.im x.re))))))))) (* (cos (+ (* 1/2 (PI)) (* 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)))) (atan2 x.im x.re)))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (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))))))
#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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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 (cos (+ (* (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (sin (+ (* 1/2 (PI)) (+ (* 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) (* (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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) 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.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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 (cos (+ (* (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.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)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -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.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (+ (* 1/2 (PI)) (* 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))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* 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/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (+ (* 1/2 (PI)) (* 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/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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 (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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 (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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 (sqrt (+ (pow x.im 2) (pow x.re 2)))) 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 (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (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.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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 (cos (+ (* (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)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 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)) #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)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 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)) #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
23.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (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) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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))) (* 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) (* (neg (atan2 x.im 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 (* y.im (atan2 x.im x.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))
21.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (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) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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))) (* 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) (* (neg (atan2 x.im 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 (* y.im (atan2 x.im x.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))
21.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (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) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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))) (* 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) (* (neg (atan2 x.im 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 (* y.im (atan2 x.im x.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))
21.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (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) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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))) (* 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) (* (neg (atan2 x.im 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 (* y.im (atan2 x.im x.re)) (cos (+ (* (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) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (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) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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))) (* 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) (* (neg (atan2 x.im 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 (* y.im (atan2 x.im x.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))

rewrite422.0ms (4.5%)

Memory

-9.0MiB live, 510.9MiB allocated; 75ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3189	44927
0	3259	43884
0	11343	40191

Stop Event

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

Counts

532 → 592

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))) (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)))))
(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
(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 (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)))
(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)
(/.f64 (PI.f64) #s(literal 2 binary64))
(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)))) #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)))
(*.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)
(.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)
(*.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) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* 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 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* 1/2 (PI)) (+ (* 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)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* 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 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* 1/2 (PI)) (+ (* 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)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* 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))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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) (* (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 (+ (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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 (* -1 (* 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 (cos (+ (* (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im 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/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (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.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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 (PI)) (+ (* 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)))) (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im 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/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (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.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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 (PI)) (+ (* 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)))) (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* 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 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* 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)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* 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 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* 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)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* 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))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* 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))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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) (* (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 (+ (* 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 (cos (+ (* (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (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/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (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.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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 (PI)) (+ (* 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)))) (* 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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (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/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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)))) (+ (* 1/2 (PI)) (* 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 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (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.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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 (PI)) (+ (* 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)))) (* 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 (+ (* -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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (* y.im (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 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (cos (+ (* 1/2 (PI)) (* 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)))) (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (* y.im (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 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* 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) 3)))) (+ (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* 1/2 (* (cos (+ (* 1/2 (PI)) (* 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) (atan2 x.im x.re))))))))) (* (cos (+ (* 1/2 (PI)) (* 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)))) (atan2 x.im x.re)))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (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))))))
#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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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 (cos (+ (* (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (sin (+ (* 1/2 (PI)) (+ (* 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) (* (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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) 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.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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 (cos (+ (* (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.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)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -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.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (+ (* 1/2 (PI)) (* 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))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* 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/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (+ (* 1/2 (PI)) (* 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/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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 (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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 (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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 (sqrt (+ (pow x.im 2) (pow x.re 2)))) 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 (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (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.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.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 (cos (+ (* (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)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 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)) #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)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 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)) #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 (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
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 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 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.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 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.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 (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 (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)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(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)))) #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)))
(*.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)))
(.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)
(*.f64 y.im (atan2.f64 x.im x.re))
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 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 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #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 (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 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) (* (neg (atan2 x.im 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 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #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)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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) (* (neg (atan2 x.im 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 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (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)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (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 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))))))) (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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (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 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (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)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (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 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))))))) (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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)))))) (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 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 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)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (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 (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 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (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 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (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 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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) (* (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) 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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 (* -1 (* 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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.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)))))) (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im 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 (cos.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))))) (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)))))) (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)))))))) (.f64 x.re 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)))))) (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im 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/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.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))))) (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)))))))))) (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 (.f64 (cos.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))))) (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)))))) (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)))))))) (.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 #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))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.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))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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))))) (.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)) (.f64 y.im (cos.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))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (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))))))))))) (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/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.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))))) (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)))))))))) (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 (.f64 (cos.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))))) (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.im (.f64 (cos.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))))) (.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 6 binary64))) (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)))))) (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)))))))) (.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)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.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))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (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)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.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))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im 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)))))) (.f64 (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))))) (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 (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))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (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.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)) (.f64 y.im (cos.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))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (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)))))))))) (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 (.f64 y.im y.im) (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))))))) (.f64 (cos.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))))) (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))) (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 (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 #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))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.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))))))) (*.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 (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))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.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))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (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))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.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))))))) (.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 (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))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.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))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (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))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (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))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.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))))))) (.f64 x.re x.re)) (/.f64 (.f64 (cos.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))))) (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)) (/ (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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) (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)) (/ (PI) 2)) (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) (PI.f64) (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)) (/ (PI) 2)) (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) (PI.f64) (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))) (.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.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))))) (sin.f64 (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) (PI.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) (* (neg (atan2 x.im 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 (cos.f64 (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) (PI.f64) (.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))))) (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re 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))))) (sin.f64 (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) (PI.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) (* (neg (atan2 x.im 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/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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))))))))) (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 (.f64 (cos.f64 (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) (PI.f64) (.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))))) (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.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 #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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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))))) (.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)) (.f64 y.im (cos.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (*.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/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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))))))))) (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 (.f64 (cos.f64 (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) (PI.f64) (.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.im (.f64 (cos.f64 (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) (PI.f64) (.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 6 binary64))) (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))))) (sin.f64 (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) (PI.f64) (.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 (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)) (.f64 y.im (cos.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im 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))))) (.f64 (sin.f64 (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) (PI.f64) (.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 4 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 (sin.f64 (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) (PI.f64) (.f64 y.re (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.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)) (.f64 y.im (cos.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (.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))))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (.f64 y.re (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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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))) (sin.f64 (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) (PI.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 (sin.f64 (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) (PI.f64) (.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 (cos.f64 (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) (PI.f64) (.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 (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (.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 (cos.f64 (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) (PI.f64) (.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 (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (cos.f64 (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) (PI.f64) (.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)) (/ (PI) 2)) (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) (PI.f64) (*.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)) (/ (PI) 2)) (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) (PI.f64) (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)) (/ (PI) 2)) (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) (PI.f64) (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)) (/ (PI) 2)) (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) (PI.f64) (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)) (*.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) 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 #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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im 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 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.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))))) (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 #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)))) (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))))))) (.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 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.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))))) (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)) (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)))) (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))))))) (.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 (cos.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))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.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 (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))))) (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)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.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)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (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)))))) (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 (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.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))))) (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)) (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)))) (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))))))) (.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 (cos.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))))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.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 (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))))) (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)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.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)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (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)))))) (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 (cos.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))))) (.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 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)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.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)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (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)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.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.re)))) (.f64 (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))))) (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)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (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)))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.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))))) (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))) (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 (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 #s(literal 1/2 binary64) (PI.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 (cos.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))))))) (*.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 (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))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.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)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.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)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (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)))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.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)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.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)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (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)))))) (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) (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)))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.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))))) (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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) (* (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 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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.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)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.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) (* (neg (atan2 x.im 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 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.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))) (fma.f64 #s(literal 1/2 binary64) (PI.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) (* (neg (atan2 x.im 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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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)))))))))) (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 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.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 #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))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.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))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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))))) (.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)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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)))))))))) (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 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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 6 binary64))) (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)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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 (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)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.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))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im 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.im)))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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 4 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 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (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) (.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)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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)))))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (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 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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)) (/ (PI) 2)) (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) (PI.f64) (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)) (/ (PI) 2)) (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) (PI.f64) (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))) (.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) (.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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.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))))) (sin.f64 (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) (PI.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) (* (neg (atan2 x.im 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 (cos.f64 (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) (PI.f64) (.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))))) (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.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)) (fma.f64 #s(literal 1/2 binary64) (PI.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) (* (neg (atan2 x.im 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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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))))))))) (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 (.f64 (cos.f64 (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) (PI.f64) (.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))))) (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.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 #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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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))))) (.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)) (.f64 y.im (cos.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (*.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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))))))))) (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 (.f64 (cos.f64 (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) (PI.f64) (.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.im (.f64 (cos.f64 (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) (PI.f64) (.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 6 binary64))) (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))))) (sin.f64 (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) (PI.f64) (.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 (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)) (.f64 y.im (cos.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im 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.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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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 4 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 (sin.f64 (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) (PI.f64) (.f64 y.re (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) (.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)) (.f64 y.im (cos.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (.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))))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (.f64 y.re (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.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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))) (sin.f64 (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) (PI.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 (sin.f64 (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) (PI.f64) (.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 (cos.f64 (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) (PI.f64) (.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 (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (.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 (cos.f64 (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) (PI.f64) (.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 (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (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) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (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) (PI.f64) (.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)) (/ (PI) 2)) (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) (PI.f64) (*.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)) (/ (PI) 2)) (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) (PI.f64) (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)) (/ (PI) 2)) (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) (PI.f64) (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)) (/ (PI) 2)) (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) (PI.f64) (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)) (*.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 (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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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)))) (fma.f64 y.re (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (atan2.f64 x.im x.re)) (.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)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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)))) (fma.f64 y.re (fma.f64 y.re (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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)))) (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)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (atan2.f64 x.im x.re)) (.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)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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)))) (fma.f64 y.re (fma.f64 y.re (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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)))) (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)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (fma.f64 y.re (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 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 3 binary64)))) (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 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (atan2.f64 x.im x.re)) (.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)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) 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))) (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))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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 (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.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 (hypot.f64 x.im x.re) y.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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) (* (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))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2)) (*.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)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.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.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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 (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.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)) (/ (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) (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 (+ (* (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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 #s(literal 1/2 binary64) (PI.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 (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 (hypot.f64 x.im 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im 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 (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 (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 (hypot.f64 x.im 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 (hypot.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/2 binary64) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im 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 (hypot.f64 x.im 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im 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 (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 (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 (hypot.f64 x.im 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 (hypot.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/2 binary64) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im 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 (hypot.f64 x.im 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 (hypot.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 (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 (hypot.f64 x.im 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 (hypot.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 #s(literal 1/2 binary64) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im 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 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im 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 (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))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (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 (hypot.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 (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 (hypot.f64 x.im 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 (hypot.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 (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 (hypot.f64 x.im 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 (hypot.f64 x.im 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 (hypot.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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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 (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)) (/ (PI) 2)) (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)) (/ (PI) 2)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im 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 (+ (* (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)) (/ (PI) 2)) (.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 (fma.f64 #s(literal 1/2 binary64) (PI.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.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))))))

eval174.0ms (1.8%)

Memory: 18.0MiB live, 254.6MiB allocated; 50ms collecting garbage
Compiler: Compiled 74 681 to 4 781 computations (93.6% saved)

prune85.0ms (0.9%)

Memory

0.9MiB live, 139.9MiB allocated; 8ms collecting garbage

Pruning

36 alts after pruning (35 fresh and 1 done)

	Pruned	Kept	Total
New	821	22	843
Fresh	15	13	28
Picked	4	1	5
Done	0	0	0
Total	840	36	876

Accuracy

97.9%

Counts

876 → 36

Alt Table

Click to see full alt table

Status	Accuracy	Program
	25.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))) (sin.f64 (+.f64 (fma.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 (PI.f64) #s(literal 2 binary64)))))
	37.2%	(.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))) (sin.f64 (+.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 (PI.f64) #s(literal 2 binary64)))))
	54.6%	(.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))) (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))))
	21.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 #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))))
	34.2%	(.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.re))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
	24.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 (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))))
	22.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.re)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	56.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 #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)))))
	58.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))))) #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)))))))))
▶	29.7%	(.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))))
	57.2%	(.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)) (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)))))
	57.2%	(.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))))
	51.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)))) (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))))
	40.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 (.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)))
▶	41.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 (.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)))
	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 (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)))
	42.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 #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)))
	32.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 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
	37.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))) (.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.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 #s(literal -1 binary64) x.re)) y.re)))
	35.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
	33.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))) x.re) y.re)))
	37.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
	21.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))) #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)))))
	20.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))) #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)))))
▶	8.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) #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))))))))))
	21.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))) #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)))))))
	26.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) #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)))))
	35.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))) (+.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)))
▶	63.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)))
▶	54.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))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	22.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)) #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)))))
	30.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)))) #s(approx (* (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))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
	42.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(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)))))
✓	26.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)) #s(literal 1 binary64)))
	34.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)))) (.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))))

Compiler

Compiled 4 467 to 2 304 computations (48.4% saved)

series227.0ms (2.4%)

Memory

7.9MiB live, 253.6MiB allocated; 43ms collecting garbage

Counts

45 → 358

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)))) (.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 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))))))))))
(.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 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 (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 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) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
(+.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))))))
(.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)))))
(+.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 #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))))
#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 (.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))
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 (* (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#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 (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 (cos (+ (* (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 (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 (* (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (+ (/ 1 (pow x.re 2)) (/ (* y.re (log x.im)) (pow x.re 2)))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (/ (* y.re (log x.im)) (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 (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 (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 (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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 (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 (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 (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) y.re)) (* (pow x.im 2) (+ 1 (* y.re (log x.im))))) (pow x.im 2))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) y.re)) (* (pow x.im 2) (* y.re (log x.im)))) (pow x.im 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) (log x.im))) (pow x.im 2))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#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 (cos (+ (* (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 (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #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 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 (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 (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 (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (+ (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))))))
#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 (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 (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 (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 1))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* y.re (+ (log x.im) (* 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 (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 (cos (+ (* (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* y.re (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* y.re (+ (log x.im) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ 1 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 (cos (+ (* (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 (* y.re (- (* -1 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))) (/ 1 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 (cos (+ (* (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 y.im #s(hole binary64 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.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
42.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.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 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (* y.re (+ (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)))) (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))) 1/2 (/ (* 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)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)) y.im (* (atan2 x.im x.re) y.re))
36.0ms	y.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.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 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (* y.re (+ (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)))) (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))) 1/2 (/ (* 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)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)) y.im (* (atan2 x.im x.re) y.re))
25.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.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 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (* y.re (+ (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)))) (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))) 1/2 (/ (* 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)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)) y.im (* (atan2 x.im x.re) y.re))
20.0ms	y.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.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 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (* y.re (+ (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)))) (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))) 1/2 (/ (* 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)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)) y.im (* (atan2 x.im x.re) y.re))
16.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.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 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (* y.re (+ (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)))) (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))) 1/2 (/ (* 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)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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)) y.im (* (atan2 x.im x.re) y.re))

rewrite264.0ms (2.8%)

Memory

28.9MiB live, 344.2MiB allocated; 42ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1953	24042
0	2008	23194
0	8426	21037

Stop Event

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

Counts

403 → 472

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)))) (.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 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))))))))))
(.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 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 (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 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) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
(+.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))))))
(.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)))))
(+.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 #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))))
#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 (.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))
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 (* (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#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 (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 (cos (+ (* (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 (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 (* (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (+ (/ 1 (pow x.re 2)) (/ (* y.re (log x.im)) (pow x.re 2)))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (/ (* y.re (log x.im)) (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 (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 (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 (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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 (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 (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 (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) y.re)) (* (pow x.im 2) (+ 1 (* y.re (log x.im))))) (pow x.im 2))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) y.re)) (* (pow x.im 2) (* y.re (log x.im)))) (pow x.im 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) (log x.im))) (pow x.im 2))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#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 (cos (+ (* (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 (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #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 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 (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 (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 (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (+ (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))))))
#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 (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 (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 (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 1))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* y.re (+ (log x.im) (* 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 (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 (cos (+ (* (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* y.re (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* y.re (+ (log x.im) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ 1 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 (cos (+ (* (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 (* y.re (- (* -1 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))) (/ 1 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 (cos (+ (* (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 y.im #s(hole binary64 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.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 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (-.f64 (.f64 x.im x.im) (.f64 x.re 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)))) (.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 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))))))
(.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 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))))
#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 binary64) (.f64 y.re (+.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) (* 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.im) (/.f64 x.re x.im)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))) (-.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))) (.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))))
(+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))
(.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))
(/.f64 (-.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re 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)))))
(/.f64 (+.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))) #s(literal 3 binary64))) (fma.f64 (log.f64 x.im) (log.f64 x.im) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re 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)))))))
(+.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 #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 (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))) (pow.f64 (hypot.f64 x.im x.re) y.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))))
(-.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 (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 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (-.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))) (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))
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)))) (-.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.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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (+.f64 #s(literal 1 binary64) (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 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) (*.f64 y.re (log.f64 x.im)))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) (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 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 (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 (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)))) 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 (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) (* 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 (* (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))
#s(approx (+ 1 (* y.re (+ (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) (/.f64 y.re (.f64 x.im x.im)) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 x.im))) (*.f64 x.re x.re)))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))
#s(approx (* y.re (+ (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) (/.f64 y.re (.f64 x.im x.im)) (/.f64 (.f64 y.re (log.f64 x.im)) (*.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 (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 (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 (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (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.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))) (+.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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.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)))))
#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.re) 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 (.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 (.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))))))
#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.re) 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 (.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 (/.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)))) (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) (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)))))))
#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 (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) y.re) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 x.im))))) (.f64 x.im x.im)))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) y.re) (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 x.im)))) (.f64 x.im x.im)))
#s(approx (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 x.re x.re) (.f64 (.f64 x.im x.im) (log.f64 x.im))) (.f64 x.im x.im)))
#s(approx (log x.im) (log.f64 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 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 (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)))) 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 (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.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 (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.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)) (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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (+.f64 #s(literal 1 binary64) (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 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) (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 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 (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 (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 (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 (+ (* 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) (* (atan2 x.im x.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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (+.f64 #s(literal 1 binary64) (*.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 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.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 (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) (*.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 (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.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 (+ (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 (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 (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 (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (+ (* 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.im) (/.f64 x.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 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re 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.im) (/.f64 x.re 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(literal 1 binary64))
#s(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im))))) (.f64 y.re (+.f64 (log.f64 x.im) (.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 (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 (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 y.re (+.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 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 y.re (+.f64 (log.f64 x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)) (pow.f64 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))) (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 (+ (* (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 (+ (* 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 (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 (.f64 #s(literal -1 binary64) (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))) (pow.f64 y.re #s(literal -1 binary64))))))
#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 (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.im) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx y.im 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.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))))))

eval127.0ms (1.3%)

Memory: -14.7MiB live, 165.5MiB allocated; 30ms collecting garbage
Compiler: Compiled 52 381 to 3 523 computations (93.3% saved)

prune98.0ms (1%)

Memory

6.7MiB live, 208.9MiB allocated; 44ms collecting garbage

Pruning

47 alts after pruning (43 fresh and 4 done)

	Pruned	Kept	Total
New	589	28	617
Fresh	15	15	30
Picked	2	3	5
Done	0	1	1
Total	606	47	653

Accuracy

97.9%

Counts

653 → 47

Alt Table

Click to see full alt table

Status	Accuracy	Program
	25.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))) (sin.f64 (+.f64 (fma.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 (PI.f64) #s(literal 2 binary64)))))
	37.2%	(.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))) (sin.f64 (+.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 (PI.f64) #s(literal 2 binary64)))))
	54.6%	(.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))) (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))))
	34.2%	(.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.re))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
	24.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 (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))))
	22.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.re)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	56.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 #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)))))
	58.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))))) #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)))))))))
	57.2%	(.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)) (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)))))
	17.4%	(.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 #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))))
	30.0%	(.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 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	28.5%	(.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 #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))))
	28.0%	(.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 #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))))))
	58.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)) #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)))))))))
	16.3%	(.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) 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))))
	14.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (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))))
	51.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)))) (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))))
	42.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)))
✓	41.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 (.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.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 #s(literal -1 binary64) x.re)) y.re)))
	37.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
✓	8.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) #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))))))))))
	21.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))) #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 binary64) (.f64 y.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))))))))))
	14.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) #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 #s(approx (+ (log x.im) ( 1/2 (/ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))))))))
	21.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))) #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)))))))
	2.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))) #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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))))))
	18.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))) #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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))))
	26.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) #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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(literal 1 binary64))))))
	35.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))) (+.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)))
✓	54.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))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	25.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 (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (-.f64 (.f64 x.im x.im) (.f64 x.re x.re)))) y.re)))
	45.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))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #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.im) (/.f64 x.re x.im)))))) y.re)))
	44.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 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re 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 #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)))
	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 #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 (.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))))))) y.re)))
	47.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))) #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)))
	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 #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)))
	46.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 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)))
	43.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))) #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)))
	39.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.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 #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)))
	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 #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)))
	21.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) (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)))))
	25.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) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) x.im)) (pow.f64 x.im y.re)))))
	30.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)))) #s(approx (* (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))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
✓	26.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)) #s(literal 1 binary64)))
	34.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)))) (.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))))

Compiler

Compiled 9 406 to 2 176 computations (76.9% saved)

regimes204.0ms (2.1%)

Memory

13.1MiB live, 251.6MiB allocated; 26ms collecting garbage

Counts

100 → 4

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)))) (.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.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 #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 #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 (.f64 x.im x.im) (+.f64 #s(literal 1 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 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (-.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)))) (.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)))) (.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) 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 #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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) 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))) #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 binary64) (.f64 y.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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 binary64) (.f64 y.re #s(approx (+ (log x.im) ( 1/2 (/ (* x.re x.re) (* x.im x.im)))) (log.f64 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 (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)))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (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 (.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 #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 (.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))))))) 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 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 y.re (+.f64 (log.f64 x.im) (.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))) (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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.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)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (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 #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)))))
(.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) 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))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #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 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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.im)) (* 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.im)) (*.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) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (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 #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 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) 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))) x.re)) 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 (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.re))) 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 #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 #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 (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))))
(.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 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))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.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 #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)) (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 #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)) (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) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) 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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 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 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.im) (.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.im)) (.f64 y.im (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))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) 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 (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 #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.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) (.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.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 #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))))) 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 (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.re))) 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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (+.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 (PI.f64) #s(literal 2 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))) (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))) (sin.f64 (+.f64 (fma.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 (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 (log.f64 (hypot.f64 x.re 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)) #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 #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 (.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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.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)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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.im (log x.im)) (* 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.im) (sin.f64 (.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 (exp.f64 (-.f64 (.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.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)))))) 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))) #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))) (-.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)))))
(.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)))))))))
(.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))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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))))

Outputs
(.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)))))
(.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))) (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 #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 (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))) (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)))))

Calls

5 calls:

72.0ms	y.re
48.0ms	x.im
30.0ms	y.im
26.0ms	x.re
21.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
80.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))))`
80.0%	1	`x.re`
83.1%	2	`x.im`
84.8%	3	`y.re`
87.7%	4	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes33.0ms (0.3%)

Memory

-32.2MiB live, 58.5MiB allocated; 7ms collecting garbage

Counts

91 → 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)))) (.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.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 #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 #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 (.f64 x.im x.im) (+.f64 #s(literal 1 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 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (-.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)))) (.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)))) (.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) 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 #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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) 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))) #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 binary64) (.f64 y.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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 binary64) (.f64 y.re #s(approx (+ (log x.im) ( 1/2 (/ (* x.re x.re) (* x.im x.im)))) (log.f64 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 (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)))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (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 (.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 #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 (.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))))))) 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 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 y.re (+.f64 (log.f64 x.im) (.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))) (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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.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)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (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 #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)))))
(.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) 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))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #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 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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.im)) (* 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.im)) (*.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) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (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 #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 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) 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))) x.re)) 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 (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.re))) 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 #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 #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 (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))))
(.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 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))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.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 #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)) (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 #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)) (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) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) 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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 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 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.im) (.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.im)) (.f64 y.im (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))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) 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 (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 #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.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) (.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.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 #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))))) 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 (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.re))) 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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (+.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 (PI.f64) #s(literal 2 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))) (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))) (sin.f64 (+.f64 (fma.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 (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 (log.f64 (hypot.f64 x.re 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)) #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 #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 (.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)))))))))

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))) (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.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 (hypot.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))) (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))))

Calls

1 calls:

22.0ms

y.im

Results

Accuracy	Segments	Branch
85.8%	3	`y.im`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes88.0ms (0.9%)

Memory

4.8MiB live, 148.1MiB allocated; 11ms collecting garbage

Counts

67 → 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)))) (.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.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 #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 #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 (.f64 x.im x.im) (+.f64 #s(literal 1 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 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (-.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)))) (.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)))) (.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) 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 #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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) 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))) #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 binary64) (.f64 y.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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 binary64) (.f64 y.re #s(approx (+ (log x.im) ( 1/2 (/ (* x.re x.re) (* x.im x.im)))) (log.f64 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 (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)))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (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 (.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 #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 (.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))))))) 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 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 y.re (+.f64 (log.f64 x.im) (.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))) (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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.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)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (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 #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)))))
(.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) 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))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #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 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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.im)) (* 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.im)) (*.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) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (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 #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 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) 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))) x.re)) 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 (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.re))) 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 #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 #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 (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))))
(.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 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))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))))

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 (hypot.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)))))

Calls

5 calls:

19.0ms	x.im
18.0ms	x.re
16.0ms	y.im
16.0ms	y.re
13.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
78.6%	1	`x.re`
80.6%	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.6%	1	`x.im`
80.5%	2	`y.re`
83.0%	3	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes106.0ms (1.1%)

Memory

2.5MiB live, 154.5MiB allocated; 57ms collecting garbage

Counts

66 → 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)))) (.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.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 #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 #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 (.f64 x.im x.im) (+.f64 #s(literal 1 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 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (-.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)))) (.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)))) (.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) 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 #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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) 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))) #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 binary64) (.f64 y.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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 binary64) (.f64 y.re #s(approx (+ (log x.im) ( 1/2 (/ (* x.re x.re) (* x.im x.im)))) (log.f64 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 (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)))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (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 (.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 #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 (.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))))))) 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 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 y.re (+.f64 (log.f64 x.im) (.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))) (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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.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)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (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 #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)))))
(.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) 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))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #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 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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.im)) (* 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.im)) (*.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) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (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 #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 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) 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))) x.re)) 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 (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.re))) 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 #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 #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 (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))))
(.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 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))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (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)))) (*.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:

38.0ms	x.re
17.0ms	y.im
17.0ms	y.re
16.0ms	x.im
13.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.1%	2	`x.re`
68.6%	2	`x.im`
80.5%	3	`y.re`
71.4%	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 (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.1%	3	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes52.0ms (0.5%)

Memory

-11.9MiB live, 80.4MiB allocated; 6ms collecting garbage

Counts

48 → 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)))) (.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.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 #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 #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 (.f64 x.im x.im) (+.f64 #s(literal 1 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 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (-.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)))) (.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)))) (.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) 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 #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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) 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))) #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 binary64) (.f64 y.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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 binary64) (.f64 y.re #s(approx (+ (log x.im) ( 1/2 (/ (* x.re x.re) (* x.im x.im)))) (log.f64 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 (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)))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (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 (.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 #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 (.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))))))) 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 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 y.re (+.f64 (log.f64 x.im) (.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))) (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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.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)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (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 #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)))

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 (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))) #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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))

Calls

4 calls:

14.0ms	y.im
13.0ms	x.im
12.0ms	y.re
9.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
65.6%	2	`x.im`
63.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.1%	3	`y.im`
66.2%	3	`y.re`

Compiler

Compiled 40 to 31 computations (22.5% saved)

regimes44.0ms (0.5%)

Memory

7.1MiB live, 53.4MiB allocated; 2ms collecting garbage

Counts

45 → 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)))) (.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.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 #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 #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 (.f64 x.im x.im) (+.f64 #s(literal 1 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 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (-.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)))) (.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)))) (.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) 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 #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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) 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))) #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 binary64) (.f64 y.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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 binary64) (.f64 y.re #s(approx (+ (log x.im) ( 1/2 (/ (* x.re x.re) (* x.im x.im)))) (log.f64 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 (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)))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (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 (.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 #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 (.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))))))) 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 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 y.re (+.f64 (log.f64 x.im) (.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))) (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)))

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 (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))) #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))) (+.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)))

Calls

3 calls:

18.0ms	x.im
11.0ms	y.im
11.0ms	x.re

Results

Accuracy	Segments	Branch
63.0%	1	`x.im`
63.0%	1	`x.re`
67.1%	3	`y.im`

Compiler

Compiled 3 to 12 computations (-300% saved)

regimes11.0ms (0.1%)

Memory

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

Counts

34 → 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)))) (.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.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 #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 #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 (.f64 x.im x.im) (+.f64 #s(literal 1 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 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (-.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)))) (.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)))) (.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) 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 #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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) 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))) #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 binary64) (.f64 y.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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 binary64) (.f64 y.re #s(approx (+ (log x.im) ( 1/2 (/ (* x.re x.re) (* x.im x.im)))) (log.f64 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 (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)))

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 (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))) #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 (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)))

Calls

1 calls:

9.0ms

y.im

Results

Accuracy	Segments	Branch
67.0%	3	`y.im`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes35.0ms (0.4%)

Memory

-15.9MiB live, 36.4MiB allocated; 4ms collecting garbage

Counts

33 → 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)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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.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 #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 #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 (.f64 x.im x.im) (+.f64 #s(literal 1 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 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (-.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)))) (.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)))) (.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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) #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(approx (+ 1 (* y.re (+ (log x.im) (* 1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) 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 #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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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) x.im) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) 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))) #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 binary64) (.f64 y.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (.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 binary64) (.f64 y.re #s(approx (+ (log x.im) ( 1/2 (/ (* x.re x.re) (* x.im x.im)))) (log.f64 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 (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)))

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)))

Calls

3 calls:

18.0ms

y.re

9.0ms

y.im

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))))

Results

Accuracy	Segments	Branch
63.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))))`
63.0%	1	`y.re`
63.0%	1	`y.im`

Compiler

Compiled 39 to 27 computations (30.8% saved)

regimes40.0ms (0.4%)

Memory

-16.3MiB live, 30.4MiB allocated; 1ms collecting garbage

Counts

13 → 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)))) (.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.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 #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 #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 (.f64 x.im x.im) (+.f64 #s(literal 1 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 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (-.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 (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)))) #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 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))

Calls

5 calls:

4.0ms	x.re
4.0ms	x.im
4.0ms	y.im
4.0ms	y.re
3.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
59.3%	3	`x.im`
59.9%	3	`x.re`
54.2%	1	`y.im`
54.2%	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))))`
62.7%	3	`y.re`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes8.0ms (0.1%)

Memory

14.0MiB live, 14.0MiB 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)))) (.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)))

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.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)))

#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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

3 calls:

2.0ms	x.im
2.0ms	y.re
2.0ms	x.re

Results

Accuracy	Segments	Branch
58.6%	3	`x.im`
58.6%	3	`x.re`
56.2%	3	`y.re`

Compiler

Compiled 3 to 12 computations (-300% saved)

regimes8.0ms (0.1%)

Memory

12.9MiB live, 12.9MiB 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

4 calls:

2.0ms	x.im
2.0ms	x.re
2.0ms	y.im
2.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
44.5%	2	`y.im`
48.7%	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 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
56.6%	3	`x.im`
51.4%	2	`x.re`

Compiler

Compiled 40 to 31 computations (22.5% saved)

regimes4.0ms (0%)

Memory

7.5MiB live, 7.5MiB 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.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.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

2 calls:

2.0ms	x.im
2.0ms	y.re

Results

Accuracy	Segments	Branch
55.8%	3	`y.re`
49.7%	3	`x.im`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes2.0ms (0%)

Memory

2.6MiB live, 2.6MiB 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
54.0%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes15.0ms (0.2%)

Memory

-34.9MiB live, 12.0MiB allocated; 2ms 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:

11.0ms	y.im
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))))
1.0ms	x.re
1.0ms	y.re
1.0ms	x.im

Results

Accuracy	Segments	Branch
26.9%	1	`y.im`
26.9%	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))))`
26.9%	1	`x.im`
26.9%	1	`x.re`
26.9%	1	`y.re`

Compiler

Compiled 41 to 35 computations (14.6% saved)

bsearch130.0ms (1.4%)

Memory

23.8MiB live, 117.5MiB allocated; 14ms collecting garbage

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
53.0ms	32277141177838.14	773387336601566.8
43.0ms	-8.27099238223028e-12	-3.524048249896234e-15
26.0ms	-5.156344922345565e+274	-1.2047466589088254e+274

Samples

59.0ms	93×	1	valid
48.0ms	243×	0	valid

Compiler

Compiled 1 762 to 1 031 computations (41.5% saved)

Precisions

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

adjust: 32.0ms (33.4% of total)

ival-mult: 31.0ms (32.4% of total)

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

ival-cos: 7.0ms (7.3% of total)

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

ival-atan2: 4.0ms (4.2% of total)

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

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

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

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

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

bsearch42.0ms (0.4%)

Memory

26.3MiB live, 71.7MiB allocated; 10ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	32277141177838.14	773387336601566.8
37.0ms	-691633153.2376077	-1057420.1144050928

Samples

19.0ms	89×	0	valid
13.0ms	39×	1	valid

Compiler

Compiled 1 450 to 878 computations (39.4% saved)

Precisions

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

ival-mult: 12.0ms (44.5% of total)

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

ival-hypot: 3.0ms (11.1% of total)

adjust: 2.0ms (7.4% of total)

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

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

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

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

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

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

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

bsearch35.0ms (0.4%)

Memory

-23.8MiB live, 69.8MiB allocated; 8ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	32277141177838.14	773387336601566.8
28.0ms	-7.105496880988367e+33	-9.368513339625663e+32

Samples

18.0ms	51×	1	valid
5.0ms	45×	0	valid

Compiler

Compiled 1 210 to 712 computations (41.2% saved)

Precisions

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

adjust: 4.0ms (20% of total)

ival-mult: 4.0ms (20% of total)

ival-hypot: 3.0ms (15% of total)

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

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

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

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

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

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

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

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

bsearch82.0ms (0.9%)

Memory

-12.7MiB live, 133.5MiB allocated; 13ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
36.0ms	1.5268526485073803e-6	514602968.42145115
36.0ms	-1.8806105840993553e-33	-9.724249257162467e-43

Samples

31.0ms	82×	1	valid
28.0ms	222×	0	valid

Compiler

Compiled 2 056 to 1 107 computations (46.2% saved)

Precisions

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

ival-mult: 11.0ms (22.5% of total)

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

ival-exp: 6.0ms (12.3% of total)

ival-cos: 6.0ms (12.3% of total)

ival-log: 6.0ms (12.3% of total)

ival-atan2: 5.0ms (10.2% of total)

adjust: 4.0ms (8.2% of total)

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

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

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

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

bsearch124.0ms (1.3%)

Memory

-5.2MiB live, 99.3MiB allocated; 17ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
22.0ms	32277141177838.14	773387336601566.8
61.0ms	-9.058146045995893e+57	-2.0901478177660774e+39

Samples

54.0ms	118×	1	valid
17.0ms	138×	0	valid

Compiler

Compiled 2 069 to 1 109 computations (46.4% saved)

Precisions

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

ival-atan2: 19.0ms (30.7% of total)

ival-mult: 11.0ms (17.8% of total)

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

adjust: 6.0ms (9.7% of total)

ival-cos: 6.0ms (9.7% of total)

ival-log: 6.0ms (9.7% of total)

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

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

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

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

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

bsearch58.0ms (0.6%)

Memory

5.7MiB live, 95.8MiB allocated; 9ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
52.0ms	9.722524402194362e+181	5.788385174431238e+192
2.0ms	-9.058146045995893e+57	-2.0901478177660774e+39

Samples

36.0ms	90×	1	valid
8.0ms	70×	0	valid

Compiler

Compiled 2 360 to 1 283 computations (45.6% saved)

Precisions

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

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

ival-hypot: 7.0ms (20.6% of total)

adjust: 5.0ms (14.7% of total)

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

ival-cos: 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)

bsearch67.0ms (0.7%)

Memory

-11.4MiB live, 85.2MiB allocated; 12ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
37.0ms	3.5470163430322487e+157	4.6727872482436454e+160
2.0ms	-9.058146045995893e+57	-2.0901478177660774e+39

Samples

21.0ms	63×	1	valid
10.0ms	65×	0	valid

Compiler

Compiled 2 092 to 1 121 computations (46.4% saved)

Precisions

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

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

ival-atan2: 5.0ms (18.7% of total)

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

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

adjust: 3.0ms (11.2% of total)

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

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

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

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

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

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

bsearch115.0ms (1.2%)

Memory

33.3MiB live, 113.1MiB allocated; 26ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
40.0ms	514602968.42145115	2113627370961693200.0
69.0ms	-7.029022566589823e-13	-1.9223086735781387e-17

Samples

35.0ms	209×	0	valid
21.0ms	63×	1	valid

Compiler

Compiled 1 961 to 1 026 computations (47.7% saved)

Precisions

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

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

ival-hypot: 7.0ms (18.1% of total)

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

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

adjust: 3.0ms (7.8% of total)

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

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

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

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

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

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

bsearch82.0ms (0.9%)

Memory

-7.8MiB live, 92.4MiB allocated; 29ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
39.0ms	2.1724986185590008e-119	1.4968893603809225e-118
38.0ms	-110066585.61051303	-734.0741002216356

Samples

46.0ms	85×	1	valid
18.0ms	155×	0	valid

Compiler

Compiled 1 828 to 941 computations (48.5% saved)

Precisions

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

ival-cos: 21.0ms (38% of total)

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

ival-hypot: 6.0ms (10.9% of total)

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

adjust: 4.0ms (7.2% of total)

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

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

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

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

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

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

bsearch66.0ms (0.7%)

Memory

27.9MiB live, 75.5MiB allocated; 7ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
30.0ms	8.192121594731353e-143	3.6391774271308284e-140
31.0ms	-2.4974766595321295e-110	-3.4867542415213745e-113

Samples

27.0ms	80×	1	valid
23.0ms	176×	0	valid

Compiler

Compiled 1 944 to 999 computations (48.6% saved)

Precisions

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

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

ival-hypot: 6.0ms (15.7% of total)

ival-log: 6.0ms (15.7% of total)

adjust: 4.0ms (10.5% of total)

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

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

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

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

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

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

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

bsearch39.0ms (0.4%)

Memory

-26.1MiB live, 19.6MiB allocated; 6ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	514602968.42145115	2113627370961693200.0
36.0ms	-5.07828697092252e-12	-7.029022566589823e-13

Samples

23.0ms	26×	1	valid
8.0ms	70×	0	valid

Compiler

Compiled 1 780 to 908 computations (49% saved)

Precisions

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

ival-mult: 18.0ms (63.6% of total)

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

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

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

adjust: 1.0ms (3.5% of total)

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

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

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

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

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

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

bsearch25.0ms (0.3%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	514602968.42145115	2113627370961693200.0
21.0ms	-0.04232639514295964	-0.0043845960138167855

Samples

9.0ms	26×	1	valid
8.0ms	70×	0	valid

Compiler

Compiled 1 780 to 908 computations (49% saved)

Precisions

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

ival-mult: 4.0ms (28.6% of total)

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

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

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

adjust: 1.0ms (7.1% of total)

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

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

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

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

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

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

simplify66.0ms (0.7%)

Memory

-9.8MiB live, 84.6MiB allocated; 15ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	185	1932
1	283	1903
2	476	1903
3	858	1903
4	2191	1903

Stop Event

1×	node limit

Calls

Call 1

Inputs
(if (<=.f64 y.im #s(literal -15200000000000000034981532466510124738277809960389118841930382646253731577786304429440756888609757006207050827407658968027896029783377305311967401849536199650556835456351032217346939274441723167247881700041588696256753472956910658318509583985461398007062661994953318428835840 binary64)) (.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))))) (if (<=.f64 y.im #s(literal -1663791412799551/79228162514264337593543950336 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))) (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))))) (if (<=.f64 y.im #s(literal 32500000000000 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))) (.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))) (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))))))))
(if (<=.f64 y.im #s(literal -2500000 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))) (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.im #s(literal 32500000000000 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))) (.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))) (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 y.im #s(literal -950000000000000005942544668033024 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))))) (if (<=.f64 y.im #s(literal 32500000000000 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))) (.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)))))))
(if (<=.f64 y.re #s(literal -5261405894391251/2923003274661805836407369665432566039311865085952 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 5404319552844595/4503599627370496 binary64)) (.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)))) (.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.im #s(literal -5000000000000000051175335102042755748152194067662372864 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 (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))) (if (<=.f64 y.im #s(literal 500000000000000 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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))
(if (<=.f64 y.im #s(literal -5000000000000000051175335102042755748152194067662372864 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 (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))) (if (<=.f64 y.im #s(literal 3399999999999999831186108956068229205858928944848587501332570464514623530847100049246365002819165417460259049247034162670765820368522630572013466729871336663874751765025393289173714528632832 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))) (+.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)))))
(if (<=.f64 y.im #s(literal -5000000000000000051175335102042755748152194067662372864 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 (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))) (if (<=.f64 y.im #s(literal 19500000000000000361435092302529835212110244424815693812120107563637834281221225199798038555960712228864825546626890618114832563520156601353158045814976046694400 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 (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))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(if (<=.f64 y.re #s(literal -940834429856889/9903520314283042199192993792 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 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (if (<=.f64 y.re #s(literal 520000000 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 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))))
(if (<=.f64 x.re #s(literal -750 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))) (if (<=.f64 x.re #s(literal 8358645329399479/181709681073901722637330951972001133588410340171829515070372549795159822028349480831547762678440891390190630401566544483383650407153664 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)))))
(if (<=.f64 x.im #s(literal -3303376002761127/2707685248164858261307045101702230179137145581421695874189921465443966120903931272499975005961073806735733604454495675614232576 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 2265383227843101/13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114304 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 -6189700196426901/1237940039285380274899124224 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 520000000 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 (<=.f64 y.re #s(literal -5476377146882523/144115188075855872 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 520000000 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.im #s(literal -15200000000000000034981532466510124738277809960389118841930382646253731577786304429440756888609757006207050827407658968027896029783377305311967401849536199650556835456351032217346939274441723167247881700041588696256753472956910658318509583985461398007062661994953318428835840 binary64)) (.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))))) (if (<=.f64 y.im #s(literal -1663791412799551/79228162514264337593543950336 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))) (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))))) (if (<=.f64 y.im #s(literal 32500000000000 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))) (.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))) (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))))))))
(if (<=.f64 y.im #s(literal -15200000000000000034981532466510124738277809960389118841930382646253731577786304429440756888609757006207050827407658968027896029783377305311967401849536199650556835456351032217346939274441723167247881700041588696256753472956910658318509583985461398007062661994953318428835840 binary64)) (.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 (neg.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))))) (if (or (<=.f64 y.im #s(literal -1663791412799551/79228162514264337593543950336 binary64)) (not (<=.f64 y.im #s(literal 32500000000000 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))) (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 #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 -2500000 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))) (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.im #s(literal 32500000000000 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))) (.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))) (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (or (<=.f64 y.im #s(literal -2500000 binary64)) (not (<=.f64 y.im #s(literal 32500000000000 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))) (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.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 (hypot.f64 x.im x.re) y.re))))
(if (<=.f64 y.im #s(literal -950000000000000005942544668033024 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))))) (if (<=.f64 y.im #s(literal 32500000000000 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))) (.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)))))))
(if (or (<=.f64 y.im #s(literal -950000000000000005942544668033024 binary64)) (not (<=.f64 y.im #s(literal 32500000000000 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 (hypot.f64 x.im x.re) y.re))))
(if (<=.f64 y.re #s(literal -5261405894391251/2923003274661805836407369665432566039311865085952 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 5404319552844595/4503599627370496 binary64)) (.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)))) (.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 -5261405894391251/2923003274661805836407369665432566039311865085952 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 5404319552844595/4503599627370496 binary64)) (.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 (neg.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)))) (.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.im #s(literal -5000000000000000051175335102042755748152194067662372864 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 (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))) (if (<=.f64 y.im #s(literal 500000000000000 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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))
(if (<=.f64 y.im #s(literal -5000000000000000051175335102042755748152194067662372864 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 (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))) (if (<=.f64 y.im #s(literal 500000000000000 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.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))))
(if (<=.f64 y.im #s(literal -5000000000000000051175335102042755748152194067662372864 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 (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))) (if (<=.f64 y.im #s(literal 3399999999999999831186108956068229205858928944848587501332570464514623530847100049246365002819165417460259049247034162670765820368522630572013466729871336663874751765025393289173714528632832 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))) (+.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)))))
(if (<=.f64 y.im #s(literal -5000000000000000051175335102042755748152194067662372864 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 (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))) (if (<=.f64 y.im #s(literal 19500000000000000361435092302529835212110244424815693812120107563637834281221225199798038555960712228864825546626890618114832563520156601353158045814976046694400 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 (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)))))
(if (or (<=.f64 y.im #s(literal -5000000000000000051175335102042755748152194067662372864 binary64)) (not (<=.f64 y.im #s(literal 19500000000000000361435092302529835212110244424815693812120107563637834281221225199798038555960712228864825546626890618114832563520156601353158045814976046694400 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 (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))) #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 (hypot.f64 x.im x.re) y.re)))
(if (<=.f64 y.re #s(literal -940834429856889/9903520314283042199192993792 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 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (if (<=.f64 y.re #s(literal 520000000 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 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))))
(if (or (<=.f64 y.re #s(literal -940834429856889/9903520314283042199192993792 binary64)) (not (<=.f64 y.re #s(literal 520000000 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 (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)))) #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))))
(if (<=.f64 x.re #s(literal -750 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))) (if (<=.f64 x.re #s(literal 8358645329399479/181709681073901722637330951972001133588410340171829515070372549795159822028349480831547762678440891390190630401566544483383650407153664 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)))))
(if (<=.f64 x.re #s(literal -750 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))) (if (<=.f64 x.re #s(literal 8358645329399479/181709681073901722637330951972001133588410340171829515070372549795159822028349480831547762678440891390190630401566544483383650407153664 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)))))
(if (<=.f64 x.im #s(literal -3303376002761127/2707685248164858261307045101702230179137145581421695874189921465443966120903931272499975005961073806735733604454495675614232576 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 2265383227843101/13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114304 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 -3303376002761127/2707685248164858261307045101702230179137145581421695874189921465443966120903931272499975005961073806735733604454495675614232576 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 2265383227843101/13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114304 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 -6189700196426901/1237940039285380274899124224 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 520000000 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 (<=.f64 y.re #s(literal -5476377146882523/144115188075855872 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 520000000 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 -5476377146882523/144115188075855872 binary64)) (not (<=.f64 y.re #s(literal 520000000 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)))

derivations409.0ms (4.3%)

Memory

11.3MiB live, 294.6MiB allocated; 52ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 934 to 188 computations (90.3% saved)

preprocess101.0ms (1.1%)

Memory: -17.0MiB live, 122.3MiB allocated; 26ms collecting garbage
Compiler: Compiled 3 942 to 414 computations (89.5% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze580.0ms (6.1%)

sample2.6s (27%)

explain412.0ms (4.3%)

preprocess191.0ms (2%)

eval0.0ms (0%)

prune1.0ms (0%)

series236.0ms (2.5%)

rewrite242.0ms (2.6%)

eval96.0ms (1%)

prune73.0ms (0.8%)

series391.0ms (4.1%)

rewrite388.0ms (4.1%)

eval550.0ms (5.8%)

prune68.0ms (0.7%)

series208.0ms (2.2%)

rewrite422.0ms (4.5%)

eval174.0ms (1.8%)

prune85.0ms (0.9%)

series227.0ms (2.4%)

rewrite264.0ms (2.8%)

eval127.0ms (1.3%)

prune98.0ms (1%)

regimes204.0ms (2.1%)

regimes33.0ms (0.3%)

regimes88.0ms (0.9%)

regimes106.0ms (1.1%)

regimes52.0ms (0.5%)

regimes44.0ms (0.5%)

regimes11.0ms (0.1%)

regimes35.0ms (0.4%)

regimes40.0ms (0.4%)

regimes8.0ms (0.1%)

regimes8.0ms (0.1%)

regimes4.0ms (0%)

regimes2.0ms (0%)

regimes15.0ms (0.2%)

bsearch130.0ms (1.4%)

bsearch42.0ms (0.4%)

bsearch35.0ms (0.4%)

bsearch82.0ms (0.9%)

bsearch124.0ms (1.3%)

bsearch58.0ms (0.6%)

bsearch67.0ms (0.7%)

bsearch115.0ms (1.2%)

bsearch82.0ms (0.9%)

bsearch66.0ms (0.7%)

bsearch39.0ms (0.4%)

bsearch25.0ms (0.3%)

simplify66.0ms (0.7%)

derivations409.0ms (4.3%)

preprocess101.0ms (1.1%)

end0.0ms (0%)

Profiling