Metrics for powComplex, real part

start0.0ms (0%)

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

analyze453.0ms (5.2%)

Memory

21.5MiB live, 642.8MiB allocated; 127ms 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.2s (25.5%)

Memory

52.0MiB live, 4 127.2MiB allocated; 588ms collecting garbage

Samples

1.1s	2 935×	1	valid
700.0ms	5 321×	0	valid

Precisions

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

ival-mult!: 292.0ms (19.9% of total)

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

ival-log: 215.0ms (14.6% of total)

adjust: 194.0ms (13.2% of total)

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

ival-atan2: 119.0ms (8.1% of total)

ival-exp: 111.0ms (7.6% of total)

ival-sub!: 48.0ms (3.3% of total)

ival-add!: 31.0ms (2.1% of total)

Bogosity

explain347.0ms (3.9%)

Memory

-3.8MiB live, 856.9MiB allocated; 25ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
185	-	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)))`
129	-	2	(-5.1153989562840935e-222 2.830502072055692e-158 4.037324600197186e+244 -4.996907694028866e-31)	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`
6	-	0	-	`(*.f64 (atan2.f64 x.im x.re) y.im)`
3	-	1	(3.217607328512483e+122 1.6386847001318667e-196 -1.6933221360434375e+70 -3.8255701946488275e-168)	`(*.f64 (atan2.f64 x.im x.re) y.re)`
0	-	0	-	`(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)`
0	-	0	-	`(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))`
0	-	0	-	`(atan2.f64 x.im x.re)`
0	-	0	-	`(*.f64 x.re x.re)`
0	-	0	-	`(-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))`
0	-	0	-	`x.re`
0	-	0	-	`x.im`
0	-	0	-	`(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))`
0	-	0	-	`(*.f64 x.im x.im)`
0	-	0	-	`(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)`
0	-	0	-	`(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))`
0	-	0	-	`y.re`
0	-	0	-	`y.im`
0	-	0	-	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
0	-	0	-	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`cos.f64`	`(cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))`	sensitivity	184	0
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`	oflow-rescue	108	0
↳	`(*.f64 x.re x.re)`	overflow	65
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	overflow	108
↳	`(*.f64 x.im x.im)`	overflow	53
`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	63
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	underflow	19
↳	`(*.f64 x.im x.im)`	underflow	75
`cos.f64`	`(cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))`	oflow-rescue	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	65
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	overflow	108
↳	`(.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	53
`*.f64`	`(*.f64 (atan2.f64 x.im x.re) y.re)`	*nu**	1	0
`*.f64`	`(*.f64 (atan2.f64 x.im x.re) y.im)`	*nu**	1	0

Confusion

	Predicted +	Predicted -
+	141	7
-	73	35

Precision

0.6588785046728972

Recall

0.9527027027027027

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	141	0	7
-	73	0	35

Precision?

0.6588785046728972

Recall?

0.9527027027027027

Freqs

test

number	freq
0	42
1	132
2	81
3	1

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

129.0ms	364×	1	valid
22.0ms	148×	0	valid

Compiler

Compiled 393 to 61 computations (84.5% saved)

Precisions

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

ival-mult!: 26.0ms (22.5% of total)

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

ival-log: 19.0ms (16.4% of total)

ival-cos: 16.0ms (13.8% of total)

adjust: 15.0ms (13% of total)

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

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

ival-add!: 3.0ms (2.6% of total)

ival-sub!: 2.0ms (1.7% of total)

preprocess35.0ms (0.4%)

Memory

-27.2MiB live, 23.4MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	141	575
1	437	556
2	1292	554
3	3522	552

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	42.8%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (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

▶

42.8%

(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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 74 to 38 computations (48.6% saved)

series609.0ms (6.9%)

Memory

-12.4MiB live, 535.5MiB allocated; 838ms 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
129.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)))) (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))
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))
13.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))
13.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))
12.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))

rewrite317.0ms (3.6%)

Memory

-11.0MiB live, 233.4MiB allocated; 59ms 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))))))

eval61.0ms (0.7%)

Memory: 41.4MiB live, 87.3MiB allocated; 3ms collecting garbage
Compiler: Compiled 31 786 to 2 820 computations (91.1% saved)

prune45.0ms (0.5%)

Memory

2.0MiB live, 48.5MiB allocated; 3ms collecting garbage

Pruning

25 alts after pruning (25 fresh and 0 done)

	Pruned	Kept	Total
New	431	25	456
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	432	25	457

Accuracy

95.1%

Counts

457 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
	38.9%	(.f64 (/.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))) (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))))
	22.9%	(.f64 (+.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)))) (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.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 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	61.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))) (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)))))
	22.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 #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.3%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	31.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.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	15.8%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (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.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))))
	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))))
	60.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 #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)))))
	36.2%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
	17.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
▶	60.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))) #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)))))))))
	55.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))) #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)))))))))
	17.7%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
▶	15.2%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	21.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	32.1%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	26.5%	(.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))))
	50.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))) (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))))
	49.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)))) (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))))
▶	31.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (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))))))
	30.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))))))
▶	60.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
	23.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))

Compiler

Compiled 3 046 to 1 562 computations (48.7% saved)

series388.0ms (4.4%)

Memory

-4.2MiB live, 605.1MiB allocated; 111ms collecting garbage

Counts

64 → 687

Calls

Call 1

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

Outputs
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (neg (atan2 x.im x.re)) y.im) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (neg (atan2 x.im x.re)) #s(hole binary64 (* -1 (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 x.im)))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ (* -1 x.im) (* -1/2 (/ (pow x.re 2) x.im)))))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 x.im))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 1))
#s(approx (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* -1/2 (/ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (pow x.re 2) (pow x.im 2)))))
#s(approx (/ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (/ (pow x.re 2) (pow x.im 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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 (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1/2 (/ (pow x.re 2) x.im))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* (pow x.re 2) (- (* -1 (/ x.im (pow x.re 2))) (* 1/2 (/ 1 x.im))))))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 x.im)) (/ x.im (pow x.re 2))))))
#s(approx (- 1 (* -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 (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 (pow x.im 2))) (/ 1 (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* 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 (log (sqrt (+ (* 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 (sqrt (+ (* 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/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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* 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 (log (sqrt (+ (* 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 (sqrt (+ (* 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/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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (/ (+ (* -1 (pow x.im 2)) (* -1/2 (pow x.re 2))) x.im)))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (/ (+ (* 1/2 (pow x.re 2)) (pow x.im 2)) x.im)))
#s(approx (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (/ (- (pow x.im 2) (* -1/2 (pow x.re 2))) (pow x.im 2))))
#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 (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* x.im (- (* -1/2 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* x.im (- 1 (* -1/2 (/ (* 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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* 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 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* -1 (* x.im (- (* -1/2 (/ (pow x.re 2) (pow x.im 2))) 1)))))
#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 (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 1))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1 (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 1))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ 1 (* -1 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ 1 (* y.re (- (* -1/2 (* y.re (pow (atan2 x.im x.re) 2))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ 1 (* y.re (- (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/6 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.re) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (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 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.re)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/2 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/6 (* (pow (log x.re) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.re)) y.im) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (/ (cos (* y.re (atan2 x.im x.re))) y.im) (* (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 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.re)) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (cos (* y.re (atan2 x.im x.re))) y.im)) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))))

Calls

12 calls:

Time	Variable		Point	Expression
60.0ms	y.re	@	-inf	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (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) (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))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))
48.0ms	x.re	@	inf	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (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) (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))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))
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.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (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) (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))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))
31.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.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (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) (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))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))
30.0ms	x.im	@	inf	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))) -1/2 (/ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (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) (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))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))

rewrite399.0ms (4.5%)

Memory

-2.8MiB live, 563.3MiB allocated; 49ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3318	45823
0	3431	44108
0	10778	42475

Stop Event

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

Counts

751 → 825

Calls

Call 1

Inputs
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(hypot.f64 x.im x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(*.f64 y.im (atan2.f64 x.im x.re))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))) y.re)
(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))))))))
#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)))))))
(.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(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)))))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))
#s(literal 1 binary64)
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))
#s(literal -1/2 binary64)
(/.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
(*.f64 (atan2.f64 x.im x.re) y.im)
(cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))
(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(.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)))))))))
(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)
#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 (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 #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 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (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))))
(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) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (neg (atan2 x.im x.re)) y.im) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (neg (atan2 x.im x.re)) #s(hole binary64 (* -1 (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 x.im)))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ (* -1 x.im) (* -1/2 (/ (pow x.re 2) x.im)))))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 x.im))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 1))
#s(approx (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* -1/2 (/ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (pow x.re 2) (pow x.im 2)))))
#s(approx (/ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (/ (pow x.re 2) (pow x.im 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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 (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1/2 (/ (pow x.re 2) x.im))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* (pow x.re 2) (- (* -1 (/ x.im (pow x.re 2))) (* 1/2 (/ 1 x.im))))))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 x.im)) (/ x.im (pow x.re 2))))))
#s(approx (- 1 (* -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 (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 (pow x.im 2))) (/ 1 (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* 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 (log (sqrt (+ (* 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 (sqrt (+ (* 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/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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* 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 (log (sqrt (+ (* 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 (sqrt (+ (* 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/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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (/ (+ (* -1 (pow x.im 2)) (* -1/2 (pow x.re 2))) x.im)))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (/ (+ (* 1/2 (pow x.re 2)) (pow x.im 2)) x.im)))
#s(approx (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (/ (- (pow x.im 2) (* -1/2 (pow x.re 2))) (pow x.im 2))))
#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 (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* x.im (- (* -1/2 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* x.im (- 1 (* -1/2 (/ (* 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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* 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 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* -1 (* x.im (- (* -1/2 (/ (pow x.re 2) (pow x.im 2))) 1)))))
#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 (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (cos (* y.re (atan2 x.im x.re))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #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.im x.im) (* x.re x.re)))) #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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 1))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))) (* (cos (* y.im (log x.re))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1 (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 1))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ 1 (* -1 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ 1 (* y.re (- (* -1/2 (* y.re (pow (atan2 x.im x.re) 2))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ 1 (* y.re (- (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/6 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.re) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (cos (* y.re (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (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 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.re)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* -1 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/2 (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/6 (* (pow (log x.re) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 2) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.re)) y.im) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (/ (cos (* y.re (atan2 x.im x.re))) y.im) (* (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 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.re)) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (cos (* y.re (atan2 x.im x.re))) y.im)) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))))

Outputs
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(+.f64 (cosh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sinh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (-.f64 (.f64 (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (sin.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (-.f64 (.f64 (.f64 (atan2.f64 x.im x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.re #s(literal 2 binary64)))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (cos.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (.f64 y.im (log.f64 x.re)) #s(literal 3 binary64)) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.im (log.f64 x.re)) (-.f64 (.f64 (.f64 y.re (atan2.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (exp.f64 (.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
(-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(log.f64 (pow.f64 x.re y.re))
(*.f64 y.im (atan2.f64 x.im x.re))
(.f64 (exp.f64 (-.f64 (.f64 (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.im) (/.f64 x.re x.im)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (exp.f64 (.f64 (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.im) (/.f64 x.re x.im)))))))) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.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.im) (/.f64 x.re x.im)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.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.im) (/.f64 x.re x.im)))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(-.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.im) (/.f64 x.re x.im)))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(.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.im) (/.f64 x.re x.im)))))))) y.re)
(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.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) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re 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(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)))))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))
#s(literal 1 binary64)
(.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))
#s(literal -1/2 binary64)
(*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))
(/.f64 (neg.f64 (.f64 x.re x.re)) (neg.f64 (.f64 x.im x.im)))
(/.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(*.f64 (atan2.f64 x.im x.re) y.im)
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (sin.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (-.f64 (.f64 (.f64 (atan2.f64 x.im x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(/.f64 (+.f64 (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 (.f64 x.re x.re) (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re 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 (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)
#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 (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 #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 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (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))))
(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) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (* (neg (atan2 x.im x.re)) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (neg (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (log.f64 x.re))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (*.f64 y.re (log.f64 x.re)))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) (fma.f64 #s(literal -1 binary64) x.im (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) x.im)
#s(approx (* x.im (- 1 (* -1/2 (/ (* 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 (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) #s(literal 1 binary64))
#s(approx (- 1 (* -1/2 (/ (* x.re x.re) (* x.im 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 (* -1/2 (/ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))
#s(approx (/ (* x.re x.re) (* x.im x.im)) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.im (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.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 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.f64 (.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/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.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 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.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) (.f64 y.im (sin.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 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.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 (sin.f64 (.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.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) (.f64 y.im (sin.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 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.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 (sin.f64 (.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.im) (sin.f64 (.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) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.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 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.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.im x.im) (* x.re x.re)))) (+.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 (sin (* y.re (atan2 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) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 x.im (.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64))))))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))
#s(approx (* x.im (- 1 (* -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 -1 binary64)) (/.f64 x.im (*.f64 x.re x.re)))))
#s(approx (- 1 (* -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 (- 1 (* -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)) (pow.f64 x.re #s(literal -2 binary64)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* 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 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.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 (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.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 (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.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 (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) (sin.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)) (sin.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) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) (sin.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)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.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 (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* 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 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.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 (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.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 (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.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 (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.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) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* 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 (log (sqrt (+ (* 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.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* 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.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* 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))) (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 x.im x.im) (.f64 #s(literal -1/2 binary64) (*.f64 x.re x.re))) x.im))
#s(approx (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 x.re x.re) (.f64 x.im x.im)) x.im))
#s(approx (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) (/.f64 (-.f64 (.f64 x.im x.im) (.f64 #s(literal -1/2 binary64) (.f64 x.re x.re))) (.f64 x.im x.im)))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.im (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.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 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.f64 (.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/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.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 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.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) (.f64 y.im (sin.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 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.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 (sin.f64 (.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.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) (.f64 y.im (sin.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 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.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 (sin.f64 (.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.re) (sin.f64 (.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) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.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.im x.im) (* x.re x.re)))) (+.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.im x.im) (* x.re x.re)))) (+.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))))) (.f64 x.im (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))) #s(literal 1 binary64))))
#s(approx (* x.im (- 1 (* -1/2 (/ (* 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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* 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 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.im)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.im)) (sin.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 (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.im)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.im)) (sin.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 (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.im)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.im)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.im)) (sin.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 (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.im)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.im)) (sin.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)) (sin.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) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.im)) (sin.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)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (* -1 (* x.im (- 1 (* -1/2 (/ (* 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 (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 x.re x.im) (/.f64 x.re x.im))) #s(literal 1 binary64)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* 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 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.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 (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.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 (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.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 (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.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)) (sin.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) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.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)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.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) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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.im x.im) (* x.re x.re)))) (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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx y.re y.re)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 #s(literal -1 binary64) (.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re)))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (*.f64 y.im (log.f64 x.re))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(literal 1 binary64))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (-.f64 (.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/6 binary64) (.f64 y.im (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.re (fma.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/120 binary64) (.f64 y.im (.f64 (.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.re (fma.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (.f64 y.im (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (.f64 #s(literal 1/120 binary64) (.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.im (.f64 y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.re (fma.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/120 binary64) (.f64 y.im (.f64 (.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.re (fma.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (.f64 y.im (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (.f64 #s(literal 1/120 binary64) (.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (.f64 y.re (fma.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))) (.f64 y.re (fma.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (.f64 #s(literal 1/120 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 #s(literal 1/120 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (atan2.f64 x.im x.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.re (+.f64 (/.f64 (.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (log.f64 x.re)))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 y.re (+.f64 (log.f64 x.re) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re)))))) (.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 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))) (.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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 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 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (log.f64 x.re)) y.re) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 x.re) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx y.im y.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))) (pow.f64 x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* 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 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 y.im (-.f64 (/.f64 (.f64 y.re (log.f64 x.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 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 (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (.f64 y.im (-.f64 (/.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) y.im) (.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 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.re) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (log.f64 x.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im)) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) y.im)) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))

eval281.0ms (3.2%)

Memory: 21.2MiB live, 314.1MiB allocated; 108ms collecting garbage
Compiler: Compiled 87 663 to 6 115 computations (93% saved)

prune61.0ms (0.7%)

Memory

-40.8MiB live, 153.6MiB allocated; 11ms collecting garbage

Pruning

35 alts after pruning (35 fresh and 0 done)

	Pruned	Kept	Total
New	1 058	28	1 086
Fresh	13	7	20
Picked	5	0	5
Done	0	0	0
Total	1 076	35	1 111

Accuracy

96.7%

Counts

1 111 → 35

Alt Table

Click to see full alt table

Status	Accuracy	Program
	22.9%	(.f64 (+.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)))) (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))))
▶	81.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)))))
	40.1%	(.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))))
	77.9%	(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 #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)))))
	22.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 #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.3%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	31.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.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	21.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))) #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 #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)))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
	55.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))) #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)))))))))
	57.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))))))
	62.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))) #s(approx (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))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(literal 1 binary64))))
	51.0%	(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	26.5%	(.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))))
	60.9%	(.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))))
▶	31.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 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
	26.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 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
	30.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))))))
	51.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.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 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
▶	44.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
	39.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.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
	42.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))) (.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)))
	44.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.re)) y.re)))
	42.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
	33.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
▶	17.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) (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)))))
	39.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #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))))))
	24.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
	30.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 #s(approx (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
	47.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))) (+.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.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
	19.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.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)))) #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)))))
▶	24.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
	23.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)))) (.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)))))

Compiler

Compiled 4 034 to 2 192 computations (45.7% saved)

series457.0ms (5.2%)

Memory

36.2MiB live, 780.2MiB allocated; 140ms collecting garbage

Counts

52 → 491

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

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

Calls

12 calls:

Time	Variable		Point	Expression
97.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 (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) 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.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)) (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))
52.0ms	y.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 (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) 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.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)) (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))
35.0ms	x.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 (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) 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.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)) (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))
33.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 (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) 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.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)) (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))
32.0ms	x.re	@	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 (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) 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.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)) (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))

rewrite392.0ms (4.5%)

Memory

24.7MiB live, 549.4MiB allocated; 135ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2954	37422
0	3036	36669
0	10250	33476

Stop Event

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

Counts

543 → 595

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

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

eval110.0ms (1.3%)

Memory: 2.4MiB live, 234.9MiB allocated; 22ms collecting garbage
Compiler: Compiled 66 996 to 4 609 computations (93.1% saved)

prune58.0ms (0.7%)

Memory

-16.4MiB live, 129.2MiB allocated; 6ms collecting garbage

Pruning

41 alts after pruning (40 fresh and 1 done)

	Pruned	Kept	Total
New	754	17	771
Fresh	7	23	30
Picked	4	1	5
Done	0	0	0
Total	765	41	806

Accuracy

96.7%

Counts

806 → 41

Alt Table

Click to see full alt table

Status	Accuracy	Program
	22.9%	(.f64 (+.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)))) (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))))
	39.5%	(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (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)))))
	53.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 #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)))))
	40.1%	(.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))))
▶	77.9%	(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 #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)))))
	22.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 #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.3%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	31.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.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	62.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))) #s(approx (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))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(literal 1 binary64))))
	51.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))))) (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)))))
	51.0%	(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	26.5%	(.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))))
	60.8%	(.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)))))
	60.9%	(.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))))
	27.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
	26.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 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
	30.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))))))
▶	51.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.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 (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)))
	39.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.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
	36.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)))
	44.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.re)) y.re)))
	36.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
	33.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) x.im)) y.re)))
	42.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
	39.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #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))))))
	10.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 (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))))
	19.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)) (.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)))))))
	24.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(literal 1 binary64)))))
▶	47.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))) (+.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)))
	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 #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 #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)))
	63.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
▶	47.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
	16.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #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)))))
	41.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))))
	18.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))))
	19.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.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)))) #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)))))
✓	24.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
▶	33.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)))) (.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)))))))
	23.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)))) (.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)))))

Compiler

Compiled 4 841 to 2 648 computations (45.3% saved)

series242.0ms (2.7%)

Memory

4.5MiB live, 293.9MiB allocated; 24ms collecting garbage

Counts

54 → 456

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
41.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)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (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 (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) 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.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2)) -1/2 (pow (* y.re (atan2 x.im x.re)) 2) 2 (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) (* (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 (+ (* -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)))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))) -1 (* y.im (atan2 x.im x.re)) (* y.re (log x.im)) (log x.im) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (PI) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))
29.0ms	x.re	@	inf	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (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 (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) 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.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2)) -1/2 (pow (* y.re (atan2 x.im x.re)) 2) 2 (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) (* (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 (+ (* -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)))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))) -1 (* y.im (atan2 x.im x.re)) (* y.re (log x.im)) (log x.im) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (PI) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))
23.0ms	x.re	@	-inf	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (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 (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) 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.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2)) -1/2 (pow (* y.re (atan2 x.im x.re)) 2) 2 (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) (* (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 (+ (* -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)))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))) -1 (* y.im (atan2 x.im x.re)) (* y.re (log x.im)) (log x.im) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (PI) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (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 (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) 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.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2)) -1/2 (pow (* y.re (atan2 x.im x.re)) 2) 2 (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) (* (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 (+ (* -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)))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))) -1 (* y.im (atan2 x.im x.re)) (* y.re (log x.im)) (log x.im) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (PI) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))
21.0ms	y.im	@	0	((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (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 (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) 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.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2)) -1/2 (pow (* y.re (atan2 x.im x.re)) 2) 2 (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) (* (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 (+ (* -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)))))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))) -1 (* y.im (atan2 x.im x.re)) (* y.re (log x.im)) (log x.im) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (PI) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))

rewrite345.0ms (3.9%)

Memory

8.7MiB live, 479.5MiB allocated; 46ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3106	41883
0	3179	40045
0	10829	37995

Stop Event

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

Counts

510 → 578

Calls

Call 1

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

Outputs
(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(+.f64 (cosh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sinh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (-.f64 (.f64 (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.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)))
(.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 (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#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)
(exp.f64 (.f64 (log.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 (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))))
(/.f64 (+.f64 (pow.f64 x.im #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)) #s(literal 3 binary64))) (fma.f64 x.im x.im (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))) (.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))))
(+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))
#s(literal 1/2 binary64)
(/.f64 (neg.f64 (*.f64 x.re x.re)) (neg.f64 x.im))
(/.f64 (*.f64 x.re x.re) 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)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
(/.f64 (+.f64 (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 (.f64 x.im x.im) (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(+.f64 (.f64 x.im x.im) (.f64 x.re x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* 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 #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))
#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)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.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)))))))
(+.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))))
(.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(.f64 (.f64 y.re (atan2.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))
#s(literal 2 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)
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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)))))))
(.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 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.re (log.f64 x.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))))
(+.f64 (cosh.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sinh.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 (pow.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (.f64 y.re (log.f64 x.im)) #s(literal 3 binary64))) (fma.f64 (.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))) (-.f64 (.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.re (log.f64 x.im))) (.f64 (.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 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))
(+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 x.im)))
#s(literal -1 binary64)
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 y.re (log.f64 x.im))
(log.f64 (pow.f64 x.im y.re))
(log.f64 x.im)
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.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)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 (.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)))) (.f64 (.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/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (.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))))
(PI.f64)
(/.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 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (.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)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (* (neg (atan2 x.im x.re)) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (neg (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) x.im)
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))
#s(approx (/ (* x.re x.re) x.im) (/.f64 (*.f64 x.re x.re) x.im))
#s(approx (* x.re x.re) (*.f64 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 (+ 1 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) (+.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 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2)) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (pow (* y.re (atan2 x.im x.re)) 2) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (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 (+ (* -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)))))) (.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 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.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 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.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 (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (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 (+ (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)) (/.f64 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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 x.re x.re) (.f64 x.im 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 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 (* y.re (log x.im)) (*.f64 y.re (log.f64 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) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) 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 (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -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 (+ (* -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)))))) (.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 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.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 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.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 (* y.re (log x.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.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 (+ (* 1/2 (PI)) (+ (* 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))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im 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 (exp.f64 (fma.f64 #s(literal -1 binary64) (.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 (+ (* -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)))))) (.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.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))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.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.im (atan2 x.im x.re))) (* y.re (log x.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.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)) (*.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) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))
#s(approx (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx y.re y.re)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 #s(literal -1 binary64) (.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))))
#s(approx (+ 1 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) #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 (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 (+ (* -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)))))) (.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) (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (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)))))) (fma.f64 y.re (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.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 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.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) (.f64 y.im (log.f64 x.im)))))))
#s(approx (* (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)))))) (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) (.f64 y.im (log.f64 x.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 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.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 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.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) (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (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)))))) (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) (.f64 y.im (log.f64 x.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 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.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 x.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.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) (.f64 y.im (log.f64 x.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 x.im) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.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 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.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) (.f64 y.im (log.f64 x.im)))))))
#s(approx (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.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 x.im)))))
#s(approx (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.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 x.im) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.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 x.im) #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 x.im) #s(literal 2 binary64))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))))
#s(approx (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.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) (.f64 y.im (log.f64 x.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) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.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) (.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 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.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) (.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (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 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (+ 1 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (+ 1 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) (.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)) (pow.f64 y.re #s(literal -2 binary64)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (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 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))) (*.f64 y.re (log.f64 x.im)))
#s(approx (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))) (.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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (+.f64 (/.f64 (.f64 y.im (log.f64 x.im)) 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 (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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))) (.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 (+ (* 1/2 (PI)) (+ (* 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 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.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 (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.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 (+ (* -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)))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)))
#s(approx (* (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)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (pow.f64 x.im y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))))
#s(approx (* (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)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))))
#s(approx (* (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)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))))
#s(approx (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (pow.f64 x.im y.re))
#s(approx (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (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 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (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 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (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 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im)))))
#s(approx (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im 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.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 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (/.f64 (.f64 y.re (log.f64 x.im)) y.im))))
#s(approx (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (*.f64 y.im (log.f64 x.im)))
#s(approx (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (.f64 y.im (+.f64 (log.f64 x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.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 (+ (* (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 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 x.im)) y.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* 1/2 (PI)) (+ (* 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 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))) y.im))))))
#s(approx (+ (* y.im (log x.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))))))

eval156.0ms (1.8%)

Memory: 22.2MiB live, 206.7MiB allocated; 104ms collecting garbage
Compiler: Compiled 65 177 to 4 191 computations (93.6% saved)

prune73.0ms (0.8%)

Memory

10.0MiB live, 155.4MiB allocated; 10ms collecting garbage

Pruning

45 alts after pruning (44 fresh and 1 done)

	Pruned	Kept	Total
New	637	17	654
Fresh	8	27	35
Picked	5	0	5
Done	0	1	1
Total	650	45	695

Accuracy

96.7%

Counts

695 → 45

Alt Table

Click to see full alt table

Status	Accuracy	Program
	39.5%	(.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (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)))))
	53.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 #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)))))
	40.1%	(.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))))
	22.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 #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.3%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	31.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.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	62.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))) #s(approx (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))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(literal 1 binary64))))
	51.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))))) (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)))))
	51.0%	(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
	48.1%	(.f64 (exp.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))) (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)))))
	26.5%	(.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))))
	60.8%	(.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)))))
	60.9%	(.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))))
	26.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 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
	30.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))))))
	37.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 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
	44.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.re)) y.re)))
	33.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 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) x.im)) y.re)))
	42.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
	39.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #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))))))
	10.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 (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))))
	19.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)) (.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)))))))
	24.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) #s(literal 1 binary64)))))
	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 #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 #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)))
	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 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(approx (+ 1 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) (.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)) (pow.f64 y.re #s(literal -2 binary64)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
	26.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(approx (+ 1 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) (.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)))
	45.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #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)))
	40.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 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)))
	39.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
	46.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) 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 #s(literal -1 binary64) x.im)) y.re)))
	38.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))) #s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
	35.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) x.im)) y.re)))
	44.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
	16.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #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)))))
	24.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)))))
	18.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))))
	19.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.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)))) #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)))))
✓	24.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
	21.0%	#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)))) (.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 #s(approx (+ ( 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
	24.9%	#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)))) (.f64 #s(approx (exp (+ ( -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (pow.f64 x.im 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)))))))
	23.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(approx (* (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)))))) (.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) (*.f64 y.im (log.f64 x.im)))))))
	34.5%	#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(approx (* (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)))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))))
	23.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)))) (.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)))))

Compiler

Compiled 8 407 to 2 088 computations (75.2% saved)

regimes117.0ms (1.3%)

Memory

-19.3MiB live, 219.8MiB allocated; 16ms collecting garbage

Counts

88 → 2

Calls

Call 1

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

23.0ms	x.im
23.0ms	x.re
22.0ms	y.re
22.0ms	y.im
18.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
84.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))))`
81.0%	1	`x.re`
82.8%	2	`x.im`
82.9%	2	`y.re`
82.6%	2	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes61.0ms (0.7%)

Memory

25.4MiB live, 118.8MiB allocated; 4ms collecting garbage

Counts

79 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

20.0ms

y.re

19.0ms

x.im

16.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
82.8%	2	`x.im`
80.4%	1	`y.re`
80.4%	1	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`

Compiler

Compiled 39 to 27 computations (30.8% saved)

regimes101.0ms (1.2%)

Memory

0.6MiB live, 190.8MiB allocated; 8ms collecting garbage

Counts

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

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

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

21.0ms	y.im
20.0ms	x.re
20.0ms	y.re
19.0ms	x.im
15.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
79.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))))`
81.9%	3	`y.re`
77.9%	1	`x.re`
81.0%	3	`y.im`
81.4%	3	`x.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes52.0ms (0.6%)

Memory

-10.9MiB live, 89.4MiB allocated; 10ms collecting garbage

Counts

61 → 2

Calls

Call 1

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

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

Calls

3 calls:

20.0ms

x.im

15.0ms

y.re

12.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
77.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))))`
79.5%	2	`x.im`
77.9%	1	`y.re`

Compiler

Compiled 39 to 27 computations (30.8% saved)

regimes36.0ms (0.4%)

Memory

-22.7MiB live, 70.8MiB allocated; 4ms collecting garbage

Counts

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

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

2 calls:

16.0ms	x.im
16.0ms	y.im

Results

Accuracy	Segments	Branch
81.0%	3	`y.im`
77.9%	1	`x.im`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes33.0ms (0.4%)

Memory

16.2MiB live, 62.9MiB allocated; 2ms collecting garbage

Counts

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

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

Calls

2 calls:

15.0ms	x.im
14.0ms	y.im

Results

Accuracy	Segments	Branch
77.9%	1	`x.im`
77.9%	1	`y.im`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes72.0ms (0.8%)

Memory

-7.6MiB live, 136.9MiB allocated; 5ms collecting garbage

Counts

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

Outputs

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

(*.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))) #s(approx (- (cos (* y.re (atan2 x.im x.re))) (* 1 (* y.im (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sin (* y.re (atan2 x.im x.re))))))) #s(literal 1 binary64))))

Calls

5 calls:

15.0ms	x.im
14.0ms	x.re
14.0ms	y.im
13.0ms	y.re
11.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
69.5%	3	`x.re`
77.1%	4	`y.im`
72.3%	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))))`
77.8%	3	`y.re`
71.9%	4	`x.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes24.0ms (0.3%)

Memory

2.7MiB live, 49.2MiB allocated; 2ms collecting garbage

Counts

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

Calls

2 calls:

11.0ms	y.im
10.0ms	y.re

Results

Accuracy	Segments	Branch
75.6%	4	`y.im`
65.0%	2	`y.re`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes12.0ms (0.1%)

Memory

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

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

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

Calls

1 calls:

9.0ms

y.im

Results

Accuracy	Segments	Branch
74.0%	3	`y.im`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes31.0ms (0.4%)

Memory

-38.5MiB live, 59.0MiB allocated; 3ms collecting garbage

Counts

27 → 2

Calls

Call 1

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

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

Calls

4 calls:

8.0ms	x.re
7.0ms	y.im
7.0ms	x.im
6.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.1%	1	`x.re`
63.1%	1	`x.im`
63.1%	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))))`
66.0%	2	`y.im`

Compiler

Compiled 40 to 31 computations (22.5% saved)

regimes8.0ms (0.1%)

Memory

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

Counts

23 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

6.0ms

y.im

Results

Accuracy	Segments	Branch
65.6%	2	`y.im`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes17.0ms (0.2%)

Memory

-8.5MiB live, 38.9MiB allocated; 1ms collecting garbage

Counts

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

Outputs

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
58.2%	3	`x.im`
60.0%	3	`x.re`
54.3%	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))))`
60.9%	3	`y.re`
55.1%	4	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes3.0ms (0%)

Memory

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

Counts

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

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

Calls

1 calls:

2.0ms

y.re

Results

Accuracy	Segments	Branch
60.7%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes5.0ms (0.1%)

Memory

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

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

Calls

2 calls:

2.0ms	x.re
2.0ms	y.re

Results

Accuracy	Segments	Branch
60.0%	3	`x.re`
57.3%	3	`y.re`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes7.0ms (0.1%)

Memory

-31.6MiB live, 15.8MiB allocated; 1ms 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.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (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))) #s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #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))) x.re) y.re)))

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

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

Calls

3 calls:

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

Results

Accuracy	Segments	Branch
57.3%	3	`y.re`
53.6%	3	`x.im`
54.4%	4	`x.re`

Compiler

Compiled 3 to 12 computations (-300% saved)

regimes6.0ms (0.1%)

Memory

15.7MiB live, 15.7MiB allocated; 0ms 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:

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

Results

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

Compiler

Compiled 41 to 35 computations (14.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN

Compiler

Compiled 40 to 26 computations (35% saved)

bsearch45.0ms (0.5%)

Memory

-11.7MiB live, 83.9MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
41.0ms	0.0009637625684705912	21635604.98405111

Samples

25.0ms	76×	1	valid
9.0ms	84×	0	valid

Compiler

Compiled 990 to 583 computations (41.1% saved)

Precisions

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

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

ival-mult!: 5.0ms (17.7% of total)

adjust: 4.0ms (14.2% of total)

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

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

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

ival-add!: 2.0ms (7.1% of total)

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

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

bsearch63.0ms (0.7%)

Memory

27.3MiB live, 120.7MiB allocated; 7ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
30.0ms	7.310530572517823e-101	4.217687119253479e-92
28.0ms	-6.920284053016805	-0.4180621888736604

Samples

25.0ms	79×	1	valid
22.0ms	177×	0	valid

Compiler

Compiled 1 555 to 1 024 computations (34.1% saved)

Precisions

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

ival-mult!: 8.0ms (22.2% of total)

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

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

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

adjust: 3.0ms (8.3% of total)

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

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

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

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

bsearch36.0ms (0.4%)

Memory

-39.0MiB live, 58.4MiB allocated; 7ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
32.0ms	0.0009637625684705912	21635604.98405111

Samples

17.0ms	58×	1	valid
6.0ms	54×	0	valid

Compiler

Compiled 1 110 to 673 computations (39.4% saved)

Precisions

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

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

ival-mult!: 4.0ms (21.1% of total)

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

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

adjust: 2.0ms (10.6% of total)

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

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

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

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

bsearch59.0ms (0.7%)

Memory

11.1MiB live, 105.0MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
31.0ms	12720201665018214.0	1.1677264220763405e+20
23.0ms	-5.495051758834111e-295	-1.3895768746795632e-297

Samples

22.0ms	70×	1	valid
21.0ms	186×	0	valid

Compiler

Compiled 1 512 to 903 computations (40.3% saved)

Precisions

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

ival-mult!: 8.0ms (23% of total)

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

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

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

adjust: 3.0ms (8.6% of total)

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

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

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

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

bsearch36.0ms (0.4%)

Memory

10.2MiB live, 59.7MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
19.0ms	3.762382677251643e-10	8.794894699285879e-10
14.0ms	-6.920284053016805	-0.4180621888736604

Samples

14.0ms	42×	1	valid
12.0ms	102×	0	valid

Compiler

Compiled 1 468 to 839 computations (42.8% saved)

Precisions

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

adjust: 4.0ms (18.7% of total)

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

ival-mult!: 4.0ms (18.7% of total)

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

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

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

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

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

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

bsearch60.0ms (0.7%)

Memory

9.9MiB live, 103.9MiB allocated; 4ms collecting garbage

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
28.0ms	1.2803303464245737e-23	1.3987954171464987e-16
1.0ms	-5.495051758834111e-295	-1.3895768746795632e-297
26.0ms	-2.0491554118847016e-7	-4.967152006190248e-12

Samples

23.0ms	213×	0	valid
17.0ms	59×	1	valid

Compiler

Compiled 2 863 to 1 611 computations (43.7% saved)

Precisions

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

ival-mult!: 7.0ms (22.4% of total)

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

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

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

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

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

adjust: 2.0ms (6.4% of total)

ival-add!: 1.0ms (3.2% of total)

ival-sub!: 1.0ms (3.2% of total)

bsearch20.0ms (0.2%)

Memory

-12.8MiB live, 34.0MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.2803303464245737e-23	1.3987954171464987e-16
17.0ms	-2.0491554118847016e-7	-4.967152006190248e-12

Samples

9.0ms	66×	0	valid
4.0ms	14×	1	valid

Compiler

Compiled 2 063 to 1 179 computations (42.9% saved)

Precisions

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

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

ival-mult!: 2.0ms (23% of total)

adjust: 1.0ms (11.5% of total)

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

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

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

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

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

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

bsearch47.0ms (0.5%)

Memory

28.4MiB live, 78.2MiB allocated; 2ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
43.0ms	1.3704349592616896e+133	3.1644976573120685e+146

Samples

28.0ms	95×	1	valid
8.0ms	65×	0	valid

Compiler

Compiled 1 290 to 683 computations (47.1% saved)

Precisions

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

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

ival-mult!: 5.0ms (17.4% of total)

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

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

adjust: 3.0ms (10.5% of total)

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

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

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

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

bsearch33.0ms (0.4%)

Memory

-35.7MiB live, 58.3MiB allocated; 5ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
31.0ms	1.3704349592616896e+133	3.1644976573120685e+146

Samples

19.0ms	58×	1	valid
6.0ms	54×	0	valid

Compiler

Compiled 1 310 to 693 computations (47.1% saved)

Precisions

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

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

ival-mult!: 4.0ms (19.9% of total)

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

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

adjust: 2.0ms (9.9% of total)

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

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

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

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

bsearch42.0ms (0.5%)

Memory

42.5MiB live, 105.5MiB allocated; 11ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
19.0ms	3.762382677251643e-10	8.794894699285879e-10
20.0ms	-1.8883927355873617e-19	-4.73695274526747e-20

Samples

18.0ms	43×	1	valid
11.0ms	101×	0	valid

Compiler

Compiled 1 240 to 638 computations (48.5% saved)

Precisions

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

ival-cos: 8.0ms (32.2% of total)

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

ival-mult!: 4.0ms (16.1% of total)

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

adjust: 2.0ms (8.1% of total)

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

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

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

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

bsearch2.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.762382677251643e-10	8.794894699285879e-10
1.0ms	-1.8883927355873617e-19	-4.73695274526747e-20

Compiler

Compiled 1 240 to 638 computations (48.5% saved)

bsearch151.0ms (1.7%)

Memory

2.0MiB live, 182.5MiB allocated; 92ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
45.0ms	1.273233061096161e-110	2.089787377131558e-100
66.0ms	-1.0156301094281767e-292	3.652502594146778e-307

Samples

49.0ms	103×	1	valid
24.0ms	217×	0	valid

Compiler

Compiled 2 620 to 1 343 computations (48.7% saved)

Precisions

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

ival-log: 25.0ms (40.4% of total)

ival-hypot: 9.0ms (14.5% of total)

ival-mult!: 9.0ms (14.5% of total)

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

adjust: 4.0ms (6.5% of total)

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

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

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

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

bsearch20.0ms (0.2%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.762382677251643e-10	8.794894699285879e-10
17.0ms	-6.920284053016805	-0.4180621888736604

Samples

7.0ms	23×	1	valid
7.0ms	57×	0	valid

Compiler

Compiled 1 432 to 731 computations (49% saved)

Precisions

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

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

ival-mult!: 2.0ms (18.9% of total)

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

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

adjust: 1.0ms (9.5% of total)

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

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

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

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

derivations429.0ms (4.9%)

Memory

-6.3MiB live, 470.2MiB allocated; 61ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 2 367 to 207 computations (91.3% saved)

preprocess88.0ms (1%)

Memory: -4.9MiB live, 135.5MiB allocated; 12ms collecting garbage
Compiler: Compiled 4 808 to 452 computations (90.6% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze453.0ms (5.2%)

sample2.2s (25.5%)

explain347.0ms (3.9%)

preprocess35.0ms (0.4%)

series609.0ms (6.9%)

rewrite317.0ms (3.6%)

eval61.0ms (0.7%)

prune45.0ms (0.5%)

series388.0ms (4.4%)

rewrite399.0ms (4.5%)

eval281.0ms (3.2%)

prune61.0ms (0.7%)

series457.0ms (5.2%)

rewrite392.0ms (4.5%)

eval110.0ms (1.3%)

prune58.0ms (0.7%)

series242.0ms (2.7%)

rewrite345.0ms (3.9%)

eval156.0ms (1.8%)

prune73.0ms (0.8%)

regimes117.0ms (1.3%)

regimes61.0ms (0.7%)

regimes101.0ms (1.2%)

regimes52.0ms (0.6%)

regimes36.0ms (0.4%)

regimes33.0ms (0.4%)

regimes72.0ms (0.8%)

regimes24.0ms (0.3%)

regimes12.0ms (0.1%)

regimes31.0ms (0.4%)

regimes8.0ms (0.1%)

regimes17.0ms (0.2%)

regimes3.0ms (0%)

regimes5.0ms (0.1%)

regimes7.0ms (0.1%)

regimes6.0ms (0.1%)

bsearch1.0ms (0%)

bsearch45.0ms (0.5%)

bsearch63.0ms (0.7%)

bsearch36.0ms (0.4%)

bsearch59.0ms (0.7%)

bsearch36.0ms (0.4%)

bsearch60.0ms (0.7%)

bsearch20.0ms (0.2%)

bsearch47.0ms (0.5%)

bsearch33.0ms (0.4%)

bsearch42.0ms (0.5%)

bsearch2.0ms (0%)

bsearch151.0ms (1.7%)

bsearch20.0ms (0.2%)

derivations429.0ms (4.9%)

preprocess88.0ms (1%)

end0.0ms (0%)

Profiling