Metrics for powComplex, real part

start0.0ms (0%)

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

analyze591.0ms (5.6%)

Memory

14.6MiB live, 431.1MiB allocated; 617ms 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.7s (25.1%)

Memory

81.7MiB live, 2 706.9MiB allocated; 607ms collecting garbage

Samples

1.3s	2 905×	1	valid
749.0ms	5 351×	0	valid

Precisions

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

ival-mult: 403.0ms (25.2% of total)

ival-hypot: 319.0ms (20% of total)

ival-log: 218.0ms (13.6% of total)

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

adjust: 175.0ms (11% of total)

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

ival-exp: 78.0ms (4.9% of total)

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

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

ival-true: 6.0ms (0.4% of total)

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

Bogosity

explain453.0ms (4.3%)

Memory

12.4MiB live, 637.8MiB allocated; 96ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
166	-	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	-	3	(-2.0713827529997194e-159 -7.374631719474157e-223 -1.9170796063841008e+246 2.6416757956937254e+231)	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`
7	-	1	(1.2179950655168043e+77 -2.213570029573843e-245 9.056156925780168e-57 2.9734019219294883e+103)	`(*.f64 (atan2.f64 x.im x.re) y.im)`
6	-	0	-	`(*.f64 (atan2.f64 x.im x.re) y.re)`
0	-	0	-	`(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)`
0	-	0	-	`(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))`
0	-	0	-	`(atan2.f64 x.im x.re)`
0	-	0	-	`(*.f64 x.re x.re)`
0	-	0	-	`(-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))`
0	-	0	-	`x.re`
0	-	0	-	`x.im`
0	-	0	-	`(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))`
0	-	0	-	`(*.f64 x.im x.im)`
0	-	0	-	`(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)`
0	-	0	-	`(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))`
0	-	0	-	`y.re`
0	-	0	-	`y.im`
0	-	0	-	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
0	-	0	-	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`cos.f64`	`(cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))`	sensitivity	166	0
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`	oflow-rescue	114	0
↳	`(*.f64 x.re x.re)`	overflow	72
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	overflow	114
↳	`(*.f64 x.im x.im)`	overflow	61
`*.f64`	`(*.f64 (atan2.f64 x.im x.re) y.re)`	*nu**	2	0
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`	uflow-rescue	2	0
↳	`(*.f64 x.re x.re)`	underflow	56
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	underflow	12
↳	`(*.f64 x.im x.im)`	underflow	68

Confusion

	Predicted +	Predicted -
+	147	4
-	67	38

Precision

0.6869158878504673

Recall

0.9735099337748344

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	147	0	4
-	67	0	38

Precision?

0.6869158878504673

Recall?

0.9735099337748344

Freqs

test

number	freq
0	42
1	144
2	70

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

145.0ms	328×	1	valid
42.0ms	184×	0	valid

Compiler

Compiled 393 to 61 computations (84.5% saved)

Precisions

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

ival-mult: 36.0ms (23.7% of total)

ival-log: 29.0ms (19.1% of total)

adjust: 25.0ms (16.5% of total)

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

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

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

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

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

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

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

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

preprocess239.0ms (2.3%)

Memory

-21.3MiB live, 165.4MiB allocated; 28ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	136	538
1	420	520
2	1239	518
3	3354	516
0	19	37
0	34	37
1	69	36
2	179	36
3	397	36
4	945	36
5	5099	36
0	8111	25

Stop Event

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

Calls

Call 1

Inputs

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

Outputs

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

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

Compiler

Compiled 37 to 19 computations (48.6% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

41.4%

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

Compiler

Compiled 37 to 19 computations (48.6% saved)

series211.0ms (2%)

Memory

42.7MiB live, 274.2MiB allocated; 34ms 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
80.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))
15.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))
13.0ms	x.re	@	-inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
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))
12.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))

simplify292.0ms (2.8%)

Memory

-2.4MiB live, 327.0MiB allocated; 62ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1565	19021
1	4823	18768
0	8099	15917

Stop Event

1×	iter limit
1×	node limit

Counts

272 → 272

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

rewrite67.0ms (0.6%)

Memory

21.1MiB live, 107.4MiB allocated; 11ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	19	176
0	34	176
1	117	174
0	905	120

Stop Event

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

Counts

19 → 260

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

eval121.0ms (1.1%)

Memory: 3.1MiB live, 193.8MiB allocated; 22ms collecting garbage
Compiler: Compiled 43 812 to 4 380 computations (90% saved)

prune35.0ms (0.3%)

Memory

-24.9MiB live, 73.3MiB allocated; 12ms collecting garbage

Pruning

17 alts after pruning (17 fresh and 0 done)

	Pruned	Kept	Total
New	766	17	783
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	767	17	784

Accuracy

95.8%

Counts

784 → 17

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	73.8%	(/.f64 (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
▶	55.4%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (fma.f64 (atan2.f64 x.im x.re) y.re (/.f64 (PI.f64) #s(literal 2 binary64))))))
	58.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))) (sin.f64 (+.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	57.5%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
	62.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 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))
	32.5%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	15.4%	(.f64 (exp.f64 (-.f64 (.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) x.im) (/.f64 (.f64 x.re x.re) x.im) (log.f64 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))))
	27.8%	(.f64 (exp.f64 #s(approx (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.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))))
	30.4%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	52.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)))) (fma.f64 (fma.f64 (.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (atan2.f64 x.im x.re)) (neg.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 (.f64 (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (neg.f64 (log.f64 (hypot.f64 x.im x.re))))) y.im (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
	52.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)))) (fma.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (atan2.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (log.f64 (hypot.f64 x.im x.re))))) y.im (.f64 (.f64 (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (neg.f64 (log.f64 (hypot.f64 x.im x.re)))))) y.im (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
▶	63.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 (pow.f64 (hypot.f64 x.im x.re) y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
▶	57.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))
	38.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 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (neg.f64 (log.f64 x.re))) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))))
	33.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 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (neg.f64 (log.f64 x.im))) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re)))))
	37.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 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))))
▶	41.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 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (atan2.f64 x.im x.re) y.re)))))

Compiler

Compiled 1 920 to 1 008 computations (47.5% saved)

series791.0ms (7.5%)

Memory

32.6MiB live, 973.7MiB allocated; 141ms collecting garbage

Counts

52 → 691

Calls

Call 1

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

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

Calls

12 calls:

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

simplify377.0ms (3.6%)

Memory

-8.9MiB live, 526.9MiB allocated; 137ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	4142	59187
0	8276	51626

Stop Event

1×	iter limit
1×	node limit

Counts

691 → 691

Calls

Call 1

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

Outputs
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.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)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* 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 y.re))) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (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)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.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 (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))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.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 y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* 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))))) (pow x.im y.re))) (exp (* 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)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* 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 y.re))) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (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)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 y.im (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.im x.im)) (/.f64 (.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 #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))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.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)) (.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 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))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.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 (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))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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.im y.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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)))) (pow.f64 x.im y.re)))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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.im y.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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)))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.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)))) (pow.f64 x.im y.re))) (.f64 x.im x.im)))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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.im y.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (cos (+ (* 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 y.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 y.re)))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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)))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.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)))) (pow.f64 x.im y.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 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.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 (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 (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))))) (pow.f64 x.im y.re))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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.im y.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (cos (+ (* 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 y.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 y.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.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 y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* y.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 y.re))) (pow x.im 2))) (+ (* (cos (+ (* 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))))) (pow x.im y.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)))))) (pow x.im y.re))))))))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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)))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.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)))) (pow.f64 x.im y.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 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.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 (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)) (fma.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 #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))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.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 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.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 #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))))) (pow.f64 x.im y.re))) (.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 (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)) (.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 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))))))) (pow.f64 x.im y.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) (pow.f64 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) (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) #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) (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) #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 (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))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) 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))) (+.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))) #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))) (+.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) (/.f64 #s(literal 1 binary64) 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 (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) (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) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx x.re x.re)
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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.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)))) (log.f64 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)))) (-.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.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)))) (+.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) (/.f64 #s(literal 1 binary64) (*.f64 x.im x.im)))))))
#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 (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) (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) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x.im x.im)))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.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)))) (.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)))) #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)))) (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)))) #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)))) (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)))) #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))) (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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (atan2 x.im x.re) y.re)) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (* (atan2 x.im x.re) y.re)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (* (cos (* y.im (log x.im))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))) (pow x.im 2))) (* (cos (* y.im (log x.im))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (.f64 y.im (log.f64 x.im)))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (.f64 (neg.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 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (.f64 (neg.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 (.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))))) (* (pow x.re 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (.f64 (neg.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 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (.f64 (neg.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 (.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (.f64 (neg.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 (.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (neg.f64 (sin.f64 (.f64 y.im (log.f64 x.im)))) (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 (pow (exp (neg y.im)) (atan2 x.im x.re)) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (pow (exp (neg y.im)) (atan2 x.im x.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (cos.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (*.f64 x.im x.im)))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.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 (.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im)))) (.f64 x.im x.im)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -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)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.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 (.f64 y.im (log.f64 x.im)))) (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 (.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (neg.f64 (sin.f64 (.f64 y.im (log.f64 x.im)))) (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 (.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im)))) (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.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 (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (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 (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (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 (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im 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) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.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 (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.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 (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.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.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))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.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.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (.f64 #s(literal 1/2 binary64) (+.f64 (/.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 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.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 #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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.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.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 (.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 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.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 #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 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.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 (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 #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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -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 (- (* 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.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.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.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 (.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 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.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 #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 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.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 (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 #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 (-.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 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/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)) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.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)))))) (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) (* (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))) (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))) #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))) (-.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))) #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))) (+.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))) #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 (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)) #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)) (-.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)) #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)) (-.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)) #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)) (-.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)) #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) (* (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) #s(hole binary64 (* y.re (log x.im))))
#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) #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) (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) #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) (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) #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)))) 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)))) #s(hole binary64 (log x.im)))
#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)))) #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)))) (-.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)))) #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)))) (+.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) (/.f64 #s(literal 1 binary64) (*.f64 x.im x.im)))))))
#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 (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) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x.im x.im)))))))
#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))) 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))) (+.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))) #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))) (+.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) (/.f64 #s(literal 1 binary64) 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 (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) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) 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)) (*.f64 x.im x.im))
#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) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (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 (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp 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)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.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)))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 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)))))))) (* (pow x.re 2) (exp (* 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)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.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)))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 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)))))))) (* (pow x.re 2) (exp (* 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)))))) (exp (* 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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -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 (* y.im (atan2 x.im x.re))))))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re))))))) (pow.f64 (exp.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)))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re)))))) (pow.f64 (exp.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 (neg.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 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)))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 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)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -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) (exp (* 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)))))) (exp (* 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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* 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))))) (+ (* -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 (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -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 (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 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 (exp.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)))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.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)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.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)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (exp.f64 (neg.f64 (.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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))) (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)))))))) (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))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re)))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))) (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))))) (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)))))))) (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)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 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)) (/ (* (exp (* -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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))) (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))))) (* (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))))) (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)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -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.re (log (/ 1 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))))) (+ (* -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))))) (+ (* -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))))) (- (* -1/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))))) (- (* 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re))))) (+.f64 (+.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 (neg.f64 (.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 (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 (neg.f64 (.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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 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 (neg.f64 (.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) (cos.f64 (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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))
#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) (exp.f64 (neg.f64 (*.f64 y.re (neg.f64 (log.f64 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) (-.f64 (exp.f64 (neg.f64 (.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 (neg.f64 (.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) #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) (+.f64 (exp.f64 (neg.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (neg.f64 (.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) #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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (neg.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (neg.f64 (.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 (neg.f64 (.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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) 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))) (.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))) #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))) (.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))) #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 (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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.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)))) (neg.f64 (neg.f64 (log.f64 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)))) (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)))) #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)))) (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)))) #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 (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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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)))) (.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 (neg.f64 (.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)))) #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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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)))) #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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 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)))) #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))) (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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (+.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 (neg.f64 (.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 (cos.f64 (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 (neg.f64 (.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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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 (neg.f64 (.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 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 (neg.f64 (.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 (.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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (*.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (.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))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (.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))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (neg.f64 (.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) (cos (* (atan2 x.im 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) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (.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))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 (neg.f64 (.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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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 (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re))))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re))))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re)))))))))) (pow x.re 4))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re))))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (exp.f64 (.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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re))))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (neg.f64 (*.f64 y.im (neg.f64 (log.f64 x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re)))))))))) (pow x.re 4)) (/ (* (exp (* -1 (* 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)))))))) (* (sin (* -1 (* y.im (log (/ 1 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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re))))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (exp.f64 (.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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re))))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re))))))) (.f64 (neg.f64 (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (cos.f64 (neg.f64 (*.f64 y.im (neg.f64 (log.f64 x.re))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (-.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (+.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 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 (neg.f64 (.f64 y.im (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 (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) (neg.f64 (*.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (-.f64 (neg.f64 (.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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.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)))) (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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (-.f64 (neg.f64 (.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 (neg.f64 (.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)))))))) (.f64 x.re x.re)) (.f64 (exp.f64 (-.f64 (neg.f64 (.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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.re (log (/ 1 x.re)))) (* y.im (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))))) (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)))) (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.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)))))) (+ (/ (* (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))))) (+ (* -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/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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (-.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (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 (.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 (-.f64 (neg.f64 (.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 (neg.f64 (.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)))))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.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))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (neg.f64 (.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))) (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 (-.f64 (neg.f64 (.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)) (.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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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.re (log (/ 1 x.re)))) (* y.im (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))))) (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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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)))) (+ (* 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.re (log (/ 1 x.re)))) (* y.im (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)))))))) (* -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.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)))))) (+ (/ (* (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))))) (+ (* -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)))) (* (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.re (log (/ 1 x.re)))) (* y.im (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)))))))) (* -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.re (log (/ 1 x.re)))) (* y.im (atan2 x.im 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (-.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (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 (.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 (-.f64 (neg.f64 (.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.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 (-.f64 (neg.f64 (.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 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (neg.f64 (.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)))))))) (.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 (neg.f64 (.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)) (.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 (-.f64 (neg.f64 (.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))))) (+.f64 (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.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))) (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 (exp.f64 (-.f64 (neg.f64 (.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))) (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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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 (neg.f64 (.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)) (.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 (-.f64 (neg.f64 (.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 (.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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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))) #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))) (exp.f64 (-.f64 (neg.f64 (.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))) #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))) (-.f64 (exp.f64 (-.f64 (neg.f64 (.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 (neg.f64 (.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))) #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))) (+.f64 (exp.f64 (-.f64 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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))) #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 (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 (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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)) #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)) (-.f64 (neg.f64 (.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)) #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)) (-.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)) #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)) (-.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)) #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) (* (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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (neg.f64 (*.f64 y.re (neg.f64 (log.f64 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) (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) #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) (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) #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.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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (neg.f64 (neg.f64 (log.f64 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)))) (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)))) #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)))) (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)))) #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 (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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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))) #s(hole binary64 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))) #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))) (.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))) #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))) (.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))) #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 (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)) #s(hole binary64 (pow x.re 2)))
#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)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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 (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp 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)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 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)))))))) (* (pow x.re 2) (exp (* 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)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 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)))))))) (* (pow x.re 2) (exp (* 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)))))) (exp (* 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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -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 (* y.im (atan2 x.im x.re))))))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.re (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)) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 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)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -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) (exp (* 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)))))) (exp (* 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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* 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))))) (+ (* -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 (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -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 (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (neg.f64 (.f64 y.re (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)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))) (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)))))))) (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))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))) (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))))) (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)))))))) (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)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 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)) (/ (* (exp (* -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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.re (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)) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))) (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))))) (* (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))))) (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)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -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.re (log (/ -1 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))))) (+ (* -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))))) (+ (* -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))))) (- (* -1/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))))) (- (* 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.re (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)) 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 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))
#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) (exp.f64 (neg.f64 (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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) (-.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 x.re 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))) (/ (* (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) (+.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (neg.f64 (.f64 y.re (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)) 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) #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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (neg.f64 (.f64 y.re (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)) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 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))) (neg.f64 (.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))) #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))) (neg.f64 (.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))) #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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 (.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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.f64 (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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.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)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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)))) (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)))) #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)))) (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)))) #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 (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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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)))) #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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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)))) #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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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)))) #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))) (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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.re (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)) 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) (cos (* (atan2 x.im 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) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.re (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)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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 (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re)))))))))) (pow x.re 4))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (exp.f64 (.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 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (neg.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re)))))))))) (pow x.re 4)) (/ (* (exp (* -1 (* 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)))))))) (* (sin (* -1 (* y.im (log (/ -1 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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (exp.f64 (.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 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.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 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 (neg.f64 (sin.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (cos (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (cos.f64 (neg.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (cos.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 x.re x.re)))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (-.f64 (cos.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 x.re x.re))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (+.f64 (cos.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) (neg.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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.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)))) (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.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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.re (log (/ -1 x.re)))) (* y.im (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))))) (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)))) (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.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)))))) (+ (/ (* (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))))) (+ (* -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/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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (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 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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.re (log (/ -1 x.re)))) (* y.im (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))))) (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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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)))) (+ (* 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.re (log (/ -1 x.re)))) (* y.im (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)))))))) (* -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.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)))))) (+ (/ (* (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))))) (+ (* -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)))) (* (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.re (log (/ -1 x.re)))) (* y.im (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)))))))) (* -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.re (log (/ -1 x.re)))) (* y.im (atan2 x.im 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (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 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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))) #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))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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))) #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))) (-.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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))) #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))) (+.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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))) #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 (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 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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)) #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)) (-.f64 (neg.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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)) #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)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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)) #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)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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)) #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) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (neg.f64 (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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) #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) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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) #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.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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)))) (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)))) #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)))) (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)))) #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 (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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 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))) (neg.f64 (.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))) #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))) (neg.f64 (.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))) #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 (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 (.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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 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 (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* 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 y.re))) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.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 (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))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (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 y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* 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))))) (pow x.re y.re))) (exp (* 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)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* 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 y.re))) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 y.im (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.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))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.re x.re)) (/.f64 (.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 #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))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.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)) (.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 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))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.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 (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))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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.re y.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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)))) (pow.f64 x.re y.re)))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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.re y.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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)))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.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)))) (pow.f64 x.re y.re))) (.f64 x.re x.re)))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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.re y.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (cos (+ (* 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 y.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 y.re)))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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)))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.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)))) (pow.f64 x.re y.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 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.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 (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 (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))))) (pow.f64 x.re y.re))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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.re y.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (cos (+ (* 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 y.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 y.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (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 y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* y.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 y.re))) (pow x.re 2))) (+ (* (cos (+ (* 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))))) (pow x.re y.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)))))) (pow x.re y.re))))))))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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)))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.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)))) (pow.f64 x.re y.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 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.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 (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)) (fma.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 #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))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.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 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.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.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))))) (pow.f64 x.re y.re))) (.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 (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)) (.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 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))))))) (pow.f64 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) (pow.f64 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) (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) #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) (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) #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 (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))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.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))) #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))) (+.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) (/.f64 #s(literal 1 binary64) 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 (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) (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) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx x.im x.im)
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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.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)))) (log.f64 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)))) (-.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)))) #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)))) (+.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) (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re)))))))
#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 (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) (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) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.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)))) #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)))) (.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)))) #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)))) (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)))) #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)))) (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)))) #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))) (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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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) (cos (* (atan2 x.im 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 (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (* (cos (* y.im (log x.re))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))) (pow x.re 2))) (* (cos (* y.im (log x.re))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (.f64 y.im (log.f64 x.re)))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* (cos (* y.im (log x.re))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (.f64 (neg.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 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (.f64 y.im (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (.f64 (neg.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 (.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* (cos (* y.im (log x.re))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))))) (* (pow x.im 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (.f64 (neg.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 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (.f64 y.im (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (.f64 (neg.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 (.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (.f64 (neg.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 (.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (neg.f64 (sin.f64 (.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (cos.f64 (*.f64 y.im (log.f64 x.re))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.re))))) (*.f64 x.re x.re)))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (+.f64 (cos.f64 (.f64 y.im (log.f64 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 (.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.re)))) (.f64 x.re x.re)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log 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)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (+.f64 (cos.f64 (.f64 y.im (log.f64 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 (.f64 y.im (log.f64 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 (.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (neg.f64 (sin.f64 (.f64 y.im (log.f64 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 (.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.re)))) (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re 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.im (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.im))))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im)))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im))))) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (-.f64 (neg.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (neg y.re) (log (/ -1 x.im))) #s(hole binary64 (* -1 (* y.re (+ (log -1) (* -1 (log x.im)))))))
#s(approx (* (neg y.re) (log (/ -1 x.im))) (neg.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im))))))
#s(approx (log (/ -1 x.im)) #s(hole binary64 (+ (log -1) (* -1 (log x.im)))))
#s(approx (log (/ -1 x.im)) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im))))
#s(approx (/ -1 x.im) #s(hole binary64 (/ -1 x.im)))
#s(approx (/ -1 x.im) (/.f64 #s(literal -1 binary64) x.im))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im)))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #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)))))) (* (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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (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))))))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.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))))) (.f64 (.f64 x.im x.im) (.f64 #s(literal 1/2 binary64) (+.f64 (/.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 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.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 #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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #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)))))) (* (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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (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))))))) (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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (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))))) (+ (* -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/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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.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))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.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 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.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 #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 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.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 (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 #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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #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)))))) (* (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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (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))))))) (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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (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))))) (+ (* -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/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 (- (* 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.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im 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 (- (* 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))))) (+ (* -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) (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.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))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.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 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.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 #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 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.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 (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 #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 (-.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 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/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)) (.f64 (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 #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)))))) (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) (* (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))) (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))) #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))) (-.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))) #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))) (+.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))) #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 (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)) #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)) (-.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)) #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)) (-.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)) #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)) (-.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)) #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) (* (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) #s(hole binary64 (* y.re (log 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) #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) (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) #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) (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) #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)))) 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)))) #s(hole binary64 (log x.re)))
#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)))) #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)))) (-.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)))) #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)))) (+.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) (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re)))))))
#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 (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) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re)))))))
#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))) (+.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))) #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))) (+.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) (/.f64 #s(literal 1 binary64) 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 (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) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.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)))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 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)))))))) (* (pow x.im 2) (exp (* 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)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.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)))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 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)))))))) (* (pow x.im 2) (exp (* 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)))))) (exp (* 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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -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 (* y.im (atan2 x.im x.re))))))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.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)))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im)))))) (pow.f64 (exp.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 (neg.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))) (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)))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 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)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -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) (exp (* 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)))))) (exp (* 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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* 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))))) (+ (* -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 (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -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 (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))) (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 (exp.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)))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.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)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.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)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (exp.f64 (neg.f64 (.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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (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 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))) (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)))))))) (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))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im)))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))) (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))))) (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)))))))) (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)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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)) (/ (* (exp (* -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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))) (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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))) (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))))) (* (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))))) (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)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -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.re (log (/ 1 x.im)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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)) (+ (/ (* (exp (* -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.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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))) (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))) (+.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)))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))) (/.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 (neg.f64 (.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 (neg.f64 (.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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))) (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 (neg.f64 (.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) (cos.f64 (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 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))
#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) (exp.f64 (neg.f64 (*.f64 y.re (neg.f64 (log.f64 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) (-.f64 (exp.f64 (neg.f64 (.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 (neg.f64 (.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) #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) (+.f64 (exp.f64 (neg.f64 (.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 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (neg.f64 (.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) #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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (neg.f64 (.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 (neg.f64 (.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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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))) #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))) (.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))) #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))) (.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))) #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 (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 (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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.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)))) (neg.f64 (neg.f64 (log.f64 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)))) (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.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)))) (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.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 (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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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)))) (.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 (neg.f64 (.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)))) #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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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)))) #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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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)))) #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))) (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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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))) (+.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)))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.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 (exp.f64 (-.f64 (neg.f64 (.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 (neg.f64 (.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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (neg.f64 (.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 (neg.f64 (.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 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (*.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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))) (exp.f64 (neg.f64 (.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))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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))) (exp.f64 (neg.f64 (.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))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (neg.f64 (.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) (cos (* (atan2 x.im 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) (cos (* (atan2 x.im 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))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (+.f64 (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (neg.f64 (.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 (exp.f64 (neg.f64 (.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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im)))))))))) (pow x.im 4))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (exp.f64 (.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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (neg.f64 (*.f64 y.im (neg.f64 (log.f64 x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im)))))))))) (pow x.im 4)) (/ (* (exp (* -1 (* 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)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (exp.f64 (.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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))))) (.f64 (neg.f64 (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im)))))) (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 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (cos.f64 (neg.f64 (*.f64 y.im (neg.f64 (log.f64 x.im))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (+.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))))) (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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))))) (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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (+.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))) (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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))))) (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 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))))) (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 (neg.f64 (.f64 y.im (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 (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 x.im))))) (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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) (neg.f64 (*.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.im))))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im)))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (neg.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im))))) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (-.f64 (neg.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (neg y.re) (log (/ -1 x.im))) #s(hole binary64 (* -1 (* y.re (+ (log -1) (log (/ 1 x.im)))))))
#s(approx (* (neg y.re) (log (/ -1 x.im))) (neg.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im))))))
#s(approx (log (/ -1 x.im)) #s(hole binary64 (+ (log -1) (log (/ 1 x.im)))))
#s(approx (log (/ -1 x.im)) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 x.im)))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (-.f64 (neg.f64 (.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))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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.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)))) (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.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (-.f64 (neg.f64 (.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 (neg.f64 (.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))) (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 (-.f64 (neg.f64 (.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))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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.re (log (/ 1 x.im)))) (* y.im (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))))) (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)))) (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.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (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.re (log (/ 1 x.im)))) (* y.im (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)))))))) (* -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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (-.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (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 (.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 (-.f64 (neg.f64 (.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 (neg.f64 (.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))) (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 (-.f64 (neg.f64 (.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))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (neg.f64 (.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))) (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 (-.f64 (neg.f64 (.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)) (.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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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.re (log (/ 1 x.im)))) (* y.im (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))))) (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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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)))) (+ (* 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.re (log (/ 1 x.im)))) (* y.im (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)))))))) (* -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.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (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.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (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.re (log (/ 1 x.im)))) (* y.im (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)))))))) (* -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.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (-.f64 (neg.f64 (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (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 (.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 (-.f64 (neg.f64 (.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.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 (-.f64 (neg.f64 (.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 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (neg.f64 (.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))) (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 (-.f64 (neg.f64 (.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)) (.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))) (+.f64 (fma.f64 (exp.f64 (-.f64 (neg.f64 (.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))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.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))) (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 (-.f64 (neg.f64 (.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))) (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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (neg.f64 (.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)) (.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 (-.f64 (neg.f64 (.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) (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 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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))) #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))) (exp.f64 (-.f64 (neg.f64 (.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))) #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))) (-.f64 (exp.f64 (-.f64 (neg.f64 (.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 (neg.f64 (.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))) #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))) (+.f64 (exp.f64 (-.f64 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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))) #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 (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 (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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)) #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)) (-.f64 (neg.f64 (.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)) #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)) (-.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)) #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)) (-.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)) #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) (* (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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (neg.f64 (*.f64 y.re (neg.f64 (log.f64 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) (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) #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) (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) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (neg.f64 (neg.f64 (log.f64 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)))) (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)))) #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)))) (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)))) #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 (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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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))) #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))) (.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))) #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))) (.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))) #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 (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)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 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)))))))) (* (pow x.im 2) (exp (* 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)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 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)))))))) (* (pow x.im 2) (exp (* 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)))))) (exp (* 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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -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 (* y.im (atan2 x.im x.re))))))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (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)) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -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) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 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)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -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) (exp (* 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)))))) (exp (* 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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* 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))))) (+ (* -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 (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -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 (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.f64 (neg.f64 y.re) (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)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (neg.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))) (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)))))))) (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))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))) (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))))) (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)))))))) (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)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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)) (/ (* (exp (* -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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (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)) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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))))) (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))))) (* (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))))) (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)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -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.re (log (/ -1 x.im)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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)) (+ (/ (* (exp (* -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.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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (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)) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (neg.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))
#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) (exp.f64 (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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) (-.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 x.im 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))) (/ (* (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) (+.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (.f64 (neg.f64 y.re) (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)) 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) #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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (.f64 (neg.f64 y.re) (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)) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 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))) (neg.f64 (.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))) #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))) (neg.f64 (.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))) #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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 (.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.f64 (-.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.f64 (+.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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.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)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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)))) (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.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)))) (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.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 (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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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)))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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)))) #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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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)))) #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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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)))) #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))) (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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (neg.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (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)) 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) (cos (* (atan2 x.im 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) (cos (* (atan2 x.im 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))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (+.f64 (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (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)) 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 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im)))))))))) (pow x.im 4))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (exp.f64 (.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 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (*.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im)))))))))) (pow x.im 4)) (/ (* (exp (* -1 (* 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)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (exp.f64 (.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 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.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 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (.f64 (neg.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (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 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (cos (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (cos.f64 (*.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 x.im x.im)))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (-.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (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 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 x.im x.im))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 (+.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (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 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (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 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (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 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) (*.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.im) (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.im) (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (* (neg y.re) (log (/ -1 x.im))) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (neg y.re) (log (/ -1 x.im))) (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (log (/ -1 x.im)) #s(hole binary64 (log (/ -1 x.im))))
#s(approx (log (/ -1 x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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.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)))) (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.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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.re (log (/ -1 x.im)))) (* y.im (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))))) (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)))) (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.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (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.re (log (/ -1 x.im)))) (* y.im (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)))))))) (* -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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (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 (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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)) (.f64 y.im (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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.re (log (/ -1 x.im)))) (* y.im (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))))) (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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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)))) (+ (* 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.re (log (/ -1 x.im)))) (* y.im (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)))))))) (* -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.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (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.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (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.re (log (/ -1 x.im)))) (* y.im (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)))))))) (* -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.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (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 (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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.im (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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)) (.f64 y.im (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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))) (+.f64 (fma.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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)) (.f64 y.im (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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))) #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))) (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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))) #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))) (-.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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))) #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))) (+.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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))) #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 (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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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)) #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)) (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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)) #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)) (-.f64 (fma.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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)) #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)) (-.f64 (fma.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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)) #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) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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) (fma.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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) #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) (fma.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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)))) (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)))) #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)))) (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)))) #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 (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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 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))) (neg.f64 (.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))) #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))) (neg.f64 (.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))) #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 (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 (.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 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 (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (cos.f64 (*.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (cos.f64 (*.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (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))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 y.re (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (cos.f64 (*.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (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))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (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))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.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)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/6 binary64) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))) (/.f64 (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (cos.f64 (*.f64 y.im (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (* (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)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (+ (* y.re (+ (* -1 (* (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)))))) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (.f64 y.re (+.f64 (neg.f64 (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.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 (hypot.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (+ (* y.re (+ (* -1 (* (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)))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (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)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/6 (* (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)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (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 (cos.f64 (.f64 y.im (log.f64 (hypot.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 (.f64 y.im (log.f64 (hypot.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 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/6 binary64) (fma.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))))
#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(literal 1 binary64))
#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) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (hypot.f64 x.im x.re)))))
#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) (+.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) #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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx y.re y.re)
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (*.f64 y.im (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (neg.f64 (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (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) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (.f64 (neg.f64 (sin.f64 (.f64 y.im (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))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (hypot.f64 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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)))) #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)))) (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (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)))) #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)))) (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 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (.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 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (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)))) #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)))) (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 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (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 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (.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 (.f64 y.im (log.f64 (hypot.f64 x.im x.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 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (.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 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (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)))) #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))) (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 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (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 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (.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 (.f64 y.im (log.f64 (hypot.f64 x.im x.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 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (.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 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/6 binary64) (fma.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.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 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (.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 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 1))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(literal 1 binary64))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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) (cos (* (atan2 x.im x.re) y.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (atan2 x.im x.re) y.re)) #s(hole binary64 1))
#s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))
#s(approx (cos (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* (atan2 x.im x.re) y.re)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (cos (* (atan2 x.im x.re) y.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 (* (atan2 x.im x.re) y.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 (* (atan2 x.im x.re) y.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 (cos (* (atan2 x.im x.re) y.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 (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im))))) (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))))) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (/ -1 x.im)) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.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 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re)))))))) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (/ -1 x.im)) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.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 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))) (fma.f64 y.re (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 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))))))))) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* -1 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im))))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (neg.f64 (.f64 y.re (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (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 (neg.f64 (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.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 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* y.re (+ (* -1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (/ -1 x.im)) 2))))))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (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 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.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 (/.f64 #s(literal -1 binary64) x.im)) #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 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (neg y.re) #s(hole binary64 (* -1 y.re)))
#s(approx (neg y.re) (neg.f64 y.re))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* -1 (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (neg.f64 (.f64 y.re (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (- (* -1/2 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (neg.f64 (sin.f64 (*.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (.f64 (neg.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) (*.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (* (exp (neg (* 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (.f64 (neg.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 (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))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* 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 (neg (* 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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) (.f64 y.im (log.f64 (hypot.f64 x.im x.re))))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (.f64 (neg.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) (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))))))) (.f64 (exp.f64 (.f64 (neg.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 (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))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #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 (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 (+ (* 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 (neg (* 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 (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* 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 (neg (* 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (exp.f64 (.f64 (neg.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 (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)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (hypot.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (hypot.f64 x.im x.re))))) (.f64 (exp.f64 (.f64 (neg.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) (.f64 y.im (log.f64 (hypot.f64 x.im x.re))))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (.f64 (neg.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) (.f64 y.im (log.f64 (hypot.f64 x.im x.re))))))))) (.f64 (exp.f64 (.f64 (neg.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 (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))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #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 (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 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* 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 (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 (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 (neg (* 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 (neg (* 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 (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* 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 (neg (* 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (exp.f64 (.f64 (neg.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 (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)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (hypot.f64 x.im x.re))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 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 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (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/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (hypot.f64 x.im x.re))))) (.f64 (exp.f64 (.f64 (neg.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 (.f64 (neg.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) (.f64 y.im (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re))))) (.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)) (atan2.f64 x.im x.re)))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (hypot.f64 x.im x.re))))) (.f64 (exp.f64 (.f64 (neg.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) (.f64 y.im (log.f64 (hypot.f64 x.im x.re))))) (.f64 (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (.f64 (neg.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) (.f64 y.im (log.f64 (hypot.f64 x.im x.re))))))))) (.f64 (exp.f64 (.f64 (neg.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 (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))) #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))) (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))) #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))) (+.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))) #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))) (+.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))) #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 (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)) #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)) (*.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)) #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) (* (atan2 x.im x.re) y.im)) (fma.f64 y.re (log.f64 (hypot.f64 x.im 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) #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) (*.f64 y.re (log.f64 (hypot.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (hypot.f64 x.im x.re))))) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (hypot.f64 x.im x.re))))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im 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 (hypot.f64 x.im x.re))))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im 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 (hypot.f64 x.im 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 (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))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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)))) (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) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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)))) (pow.f64 (hypot.f64 x.im x.re) 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (.f64 y.re (+.f64 (/.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re))) 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(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))) (cos (+ (* (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 y.re (log.f64 (hypot.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (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 (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (* -1 (log (/ -1 x.im))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 (/.f64 (.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re)))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (fma.f64 y.re (log.f64 (hypot.f64 x.im x.re)) (.f64 (neg.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 (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))) #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 (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 y.re (log.f64 (hypot.f64 x.im 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)) #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)) (*.f64 y.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)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (neg.f64 (/.f64 (.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (.f64 y.im (log.f64 (hypot.f64 x.im x.re))) y.re) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (neg.f64 (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re))) y.re) (neg.f64 (atan2.f64 x.im x.re))))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (log (/ -1 x.im)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (neg.f64 (.f64 y.re (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (/.f64 (.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (/ (* y.im (log (/ -1 x.im))) y.re))))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) (neg.f64 (.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (/.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) 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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (neg.f64 (.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (neg.f64 (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) y.re) (neg.f64 (atan2.f64 x.im x.re))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re)))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)) (neg.f64 (.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re))))))
#s(approx (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.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) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.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) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -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))) (* (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 (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (neg.f64 (.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))) (.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 (/ (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (+ (* -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)))) (* (- (* -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))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (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))))) (* (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) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (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 (-.f64 (.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 (-.f64 (neg.f64 (.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))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))))) (.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 (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) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (+ (* -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)))) (* y.im (- (* 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/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/2 (* (- (* -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))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -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)))) (* (- (* -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))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.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)))) (* (- (* -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))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (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))))) (* (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) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (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 (-.f64 (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))) (.f64 y.im (-.f64 (.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)))) (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/2 binary64) (.f64 (-.f64 (neg.f64 (.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))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 (-.f64 (.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 (-.f64 (neg.f64 (.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))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.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 (-.f64 (neg.f64 (.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))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))))) (.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 (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) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.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))) (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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -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)))) (* -1/2 (* y.im (* (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))))))) (* (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) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (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 #s(literal -1/2 binary64) (.f64 y.im (.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)))))) (.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) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -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/6 (* y.im (* (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))))))))) (* (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) (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (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))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.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 (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (.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.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.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 y.im #s(hole binary64 y.im))
#s(approx y.im y.im)
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 1))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(literal 1 binary64))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (exp y.im) #s(hole binary64 1))
#s(approx (exp y.im) #s(literal 1 binary64))
#s(approx (exp y.im) #s(hole binary64 (+ 1 y.im)))
#s(approx (exp y.im) (+.f64 #s(literal 1 binary64) y.im))
#s(approx (exp y.im) #s(hole binary64 (+ 1 (* y.im (+ 1 (* 1/2 y.im))))))
#s(approx (exp y.im) (+.f64 #s(literal 1 binary64) (.f64 y.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) y.im)))))
#s(approx (exp y.im) #s(hole binary64 (+ 1 (* y.im (+ 1 (* y.im (+ 1/2 (* 1/6 y.im))))))))
#s(approx (exp y.im) (+.f64 #s(literal 1 binary64) (.f64 y.im (+.f64 #s(literal 1 binary64) (.f64 y.im (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(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)))) (.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(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)))) (fma.f64 y.im (.f64 #s(literal -1 binary64) (fma.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 (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)))) #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)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.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 (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)))) #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))) (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) (fma.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 (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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 1))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(literal 1 binary64))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (+ (* 1/2 (pow (atan2 x.im x.re) 2)) (* y.im (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))))
#s(approx (pow (exp (neg y.im)) (atan2 x.im x.re)) #s(hole binary64 1))
#s(approx (pow (exp (neg y.im)) (atan2 x.im x.re)) #s(literal 1 binary64))
#s(approx (pow (exp (neg y.im)) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (pow (exp (neg y.im)) (atan2 x.im x.re)) (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (pow (exp (neg y.im)) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (pow (exp (neg y.im)) (atan2 x.im x.re)) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (pow (exp (neg y.im)) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (pow (exp (neg y.im)) (atan2 x.im x.re)) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (exp (neg y.im)) #s(hole binary64 1))
#s(approx (exp (neg y.im)) #s(literal 1 binary64))
#s(approx (exp (neg y.im)) #s(hole binary64 (+ 1 (* -1 y.im))))
#s(approx (exp (neg y.im)) (+.f64 #s(literal 1 binary64) (neg.f64 y.im)))
#s(approx (exp (neg y.im)) #s(hole binary64 (+ 1 (* y.im (- (* 1/2 y.im) 1)))))
#s(approx (exp (neg y.im)) (+.f64 #s(literal 1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal 1/2 binary64) y.im) #s(literal 1 binary64)))))
#s(approx (exp (neg y.im)) #s(hole binary64 (+ 1 (* y.im (- (* y.im (+ 1/2 (* -1/6 y.im))) 1)))))
#s(approx (exp (neg y.im)) (+.f64 #s(literal 1 binary64) (.f64 y.im (-.f64 (.f64 y.im (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) y.im))) #s(literal 1 binary64)))))
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im)))
#s(approx (neg y.im) (neg.f64 y.im))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 1))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(literal 1 binary64))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* 1/24 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64))))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6))) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 y.im y.im) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im) (*.f64 y.im (log.f64 (hypot.f64 x.im x.re))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im 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 (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.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 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (+ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (+.f64 (neg.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (+.f64 (neg.f64 (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (+ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))
#s(approx (* (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.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 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* -1 (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (neg.f64 (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (* 1/2 (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (+.f64 (neg.f64 (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (exp.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (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 (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (fma.f64 (neg.f64 y.im) (atan2.f64 x.im x.re) (*.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.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 (/ -1 x.im)) 2)))) (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.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 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))) (.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 (cos (+ (* (neg y.im) (log (/ -1 x.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 (/ -1 x.im)) 2))) (* -1/6 (* y.im (* (pow (log (/ -1 x.im)) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (cos (+ (* (neg y.im) (log (/ -1 x.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 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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))) (.f64 #s(literal 1/2 binary64) (fma.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 (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) (* (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))) (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))) #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))) (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))) #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))) (fma.f64 y.im (+.f64 (neg.f64 (.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))) #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 (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)) #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.re) (* (atan2 x.im x.re) y.im)) (fma.f64 y.im (neg.f64 (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (exp y.im) #s(hole binary64 (exp y.im)))
#s(approx (exp y.im) (exp.f64 y.im))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 y.im (log.f64 (hypot.f64 x.im x.re)))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (neg y.im)) #s(hole binary64 (exp (neg y.im))))
#s(approx (exp (neg y.im)) (exp.f64 (neg.f64 y.im)))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) (cos.f64 (*.f64 y.im (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (* -1 (/ (* y.re (log (/ -1 x.im))) y.im)) (atan2 x.im x.re)))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (.f64 y.im (-.f64 (neg.f64 (/.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.im)) (atan2.f64 x.im x.re))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) 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) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 y.im (-.f64 (/.f64 (.f64 y.re (log.f64 (hypot.f64 x.im x.re))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (*.f64 y.im (log.f64 (hypot.f64 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (atan2 x.im x.re) y.re)) (neg.f64 (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (neg.f64 (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (exp (neg y.im)) #s(hole binary64 (exp (* -1 y.im))))
#s(approx (exp (neg y.im)) (exp.f64 (neg.f64 y.im)))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (/ (* y.re (log (/ -1 x.im))) y.im) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (neg.f64 (.f64 y.im (-.f64 (/.f64 (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.im) (neg.f64 (atan2.f64 x.im x.re))))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)) (neg.f64 (.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 (/.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)) #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.re) (* (atan2 x.im x.re) y.im)) (neg.f64 (.f64 y.im (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 y.re (log.f64 (hypot.f64 x.im x.re))) y.im) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))) (neg.f64 (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))) y.im))))))

rewrite165.0ms (1.6%)

Memory

-16.2MiB live, 213.9MiB allocated; 47ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	67	579
0	114	505
1	386	502
0	2427	501

Stop Event

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

Counts

52 → 692

Calls

Call 1

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

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

eval674.0ms (6.4%)

Memory: 1.7MiB live, 652.1MiB allocated; 862ms collecting garbage
Compiler: Compiled 134 784 to 9 921 computations (92.6% saved)

prune162.0ms (1.5%)

Memory

7.7MiB live, 295.6MiB allocated; 28ms collecting garbage

Pruning

30 alts after pruning (30 fresh and 0 done)

	Pruned	Kept	Total
New	1 930	30	1 960
Fresh	12	0	12
Picked	5	0	5
Done	0	0	0
Total	1 947	30	1 977

Accuracy

96.7%

Counts

1 977 → 30

Alt Table

Click to see full alt table

Status	Accuracy	Program
	36.1%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (.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))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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))))))
	37.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.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.im) (.f64 y.re (atan2.f64 x.im x.re)))))))
	55.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (.f64 (neg.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 (hypot.f64 x.im x.re)))))))
	49.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 (pow.f64 (fma.f64 x.re x.re (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
	63.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 (pow.f64 (pow.f64 (hypot.f64 x.re x.im) (/.f64 y.re #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
	62.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 (pow.f64 (hypot.f64 x.im x.re) y.re) (sin.f64 (fma.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶	64.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 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	55.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (hypot.f64 x.re x.im)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
	55.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (/.f64 (PI.f64) #s(literal 2 binary64))))))
	30.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (cos.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 x.re))) y.im))))
	53.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) #s(approx (cos ( (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(literal 1 binary64))))
	34.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 (pow.f64 #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) (/.f64 #s(literal 1 binary64) x.re)))))) y.re) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
	39.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.im)) y.re) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
▶	39.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
	36.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) (cos.f64 (*.f64 (atan2.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 (pow.f64 #s(approx (exp (neg y.im)) (+.f64 #s(literal 1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal 1/2 binary64) y.im) #s(literal 1 binary64))))) (atan2.f64 x.im x.re)) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))
	40.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 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (neg.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 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 (exp.f64 #s(approx (- ( (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (atan2.f64 x.im x.re) y.re)))))
	31.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 (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)) (cos.f64 (*.f64 (atan2.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 (pow (exp (neg y.im)) (atan2 x.im x.re)) (+.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))
	31.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 (pow (exp (neg y.im)) (atan2 x.im x.re)) #s(literal 1 binary64)) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))
	32.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (hypot.f64 x.im x.re))))))
▶	31.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(literal 1 binary64)))
	32.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (+.f64 #s(literal 1 binary64) (*.f64 (neg.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)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
	32.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	25.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	25.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
▶	30.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))

Compiler

Compiled 3 822 to 2 042 computations (46.6% saved)

series274.0ms (2.6%)

Memory

7.9MiB live, 384.9MiB allocated; 44ms collecting garbage

Counts

41 → 244

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
44.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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im x.re y.re (cos (* (atan2 x.im 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.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)))) (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (* (cos (neg (* y.im (log (/ -1 x.re))))) (exp (* (neg y.im) (atan2 x.im x.re)))) (cos (neg (* y.im (log (/ -1 x.re))))) (neg (* y.im (log (/ -1 x.re)))) (* y.im (log (/ -1 x.re))) y.im (log (/ -1 x.re)) (/ -1 x.re) -1 (exp (* (neg y.im) (atan2 x.im x.re))) (* (neg y.im) (atan2 x.im x.re)) (neg y.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 (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (* (neg y.re) (log (/ -1 x.im))) (neg y.re) (log (/ -1 x.im)) (/ -1 x.im) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))
29.0ms	x.im	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im x.re y.re (cos (* (atan2 x.im 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.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)))) (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (* (cos (neg (* y.im (log (/ -1 x.re))))) (exp (* (neg y.im) (atan2 x.im x.re)))) (cos (neg (* y.im (log (/ -1 x.re))))) (neg (* y.im (log (/ -1 x.re)))) (* y.im (log (/ -1 x.re))) y.im (log (/ -1 x.re)) (/ -1 x.re) -1 (exp (* (neg y.im) (atan2 x.im x.re))) (* (neg y.im) (atan2 x.im x.re)) (neg y.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 (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (* (neg y.re) (log (/ -1 x.im))) (neg y.re) (log (/ -1 x.im)) (/ -1 x.im) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))
28.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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im x.re y.re (cos (* (atan2 x.im 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.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)))) (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (* (cos (neg (* y.im (log (/ -1 x.re))))) (exp (* (neg y.im) (atan2 x.im x.re)))) (cos (neg (* y.im (log (/ -1 x.re))))) (neg (* y.im (log (/ -1 x.re)))) (* y.im (log (/ -1 x.re))) y.im (log (/ -1 x.re)) (/ -1 x.re) -1 (exp (* (neg y.im) (atan2 x.im x.re))) (* (neg y.im) (atan2 x.im x.re)) (neg y.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 (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (* (neg y.re) (log (/ -1 x.im))) (neg y.re) (log (/ -1 x.im)) (/ -1 x.im) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))
27.0ms	x.re	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im x.re y.re (cos (* (atan2 x.im 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.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)))) (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (* (cos (neg (* y.im (log (/ -1 x.re))))) (exp (* (neg y.im) (atan2 x.im x.re)))) (cos (neg (* y.im (log (/ -1 x.re))))) (neg (* y.im (log (/ -1 x.re)))) (* y.im (log (/ -1 x.re))) y.im (log (/ -1 x.re)) (/ -1 x.re) -1 (exp (* (neg y.im) (atan2 x.im x.re))) (* (neg y.im) (atan2 x.im x.re)) (neg y.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 (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (* (neg y.re) (log (/ -1 x.im))) (neg y.re) (log (/ -1 x.im)) (/ -1 x.im) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))
22.0ms	x.re	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im x.re y.re (cos (* (atan2 x.im 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.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)))) (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (* (cos (neg (* y.im (log (/ -1 x.re))))) (exp (* (neg y.im) (atan2 x.im x.re)))) (cos (neg (* y.im (log (/ -1 x.re))))) (neg (* y.im (log (/ -1 x.re)))) (* y.im (log (/ -1 x.re))) y.im (log (/ -1 x.re)) (/ -1 x.re) -1 (exp (* (neg y.im) (atan2 x.im x.re))) (* (neg y.im) (atan2 x.im x.re)) (neg y.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 (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))) (exp (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im))) (- (* (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (* (neg y.re) (log (/ -1 x.im))) (neg y.re) (log (/ -1 x.im)) (/ -1 x.im) (cos (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (+ (* (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re)))

simplify277.0ms (2.6%)

Memory

6.8MiB live, 280.8MiB allocated; 53ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1763	18239
1	5830	17837
0	8252	15876

Stop Event

1×	iter limit
1×	node limit

Counts

244 → 244

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

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

rewrite170.0ms (1.6%)

Memory

-15.5MiB live, 262.5MiB allocated; 60ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	73	601
0	103	542
1	313	542
2	1955	494
0	8520	485

Stop Event

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

Counts

41 → 437

Calls

Call 1

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

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

eval101.0ms (1%)

Memory: 2.0MiB live, 191.9MiB allocated; 27ms collecting garbage
Compiler: Compiled 65 612 to 4 161 computations (93.7% saved)

prune113.0ms (1.1%)

Memory

23.2MiB live, 261.8MiB allocated; 25ms collecting garbage

Pruning

45 alts after pruning (43 fresh and 2 done)

	Pruned	Kept	Total
New	715	27	742
Fresh	9	16	25
Picked	3	2	5
Done	0	0	0
Total	727	45	772

Accuracy

96.7%

Counts

772 → 45

Alt Table

Click to see full alt table

Status	Accuracy	Program
	36.1%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (.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))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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))))))
	37.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
	55.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (.f64 (neg.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 (hypot.f64 x.im x.re)))))))
▶	63.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 (pow.f64 (pow.f64 (hypot.f64 x.re x.im) (/.f64 y.re #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
	44.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 (pow.f64 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) #s(literal 2 binary64)) (/.f64 y.re #s(literal 2 binary64))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
	47.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal 1 binary64)))))
	55.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (hypot.f64 x.re x.im)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
	55.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (/.f64 (PI.f64) #s(literal 2 binary64))))))
	30.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (cos.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 x.re))) y.im))))
	53.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) #s(approx (cos ( (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(literal 1 binary64))))
	31.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (fma.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) x.im)) (.f64 x.re x.re) x.im)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	34.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (fma.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) x.re)) (.f64 x.im x.im) x.re)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	41.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.re x.re) x.im) #s(literal 1/2 binary64) x.im)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	44.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.im x.im) x.re) #s(literal 1/2 binary64) x.re)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	43.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) x.re) (/.f64 (.f64 x.im x.im) x.re) #s(literal 1 binary64)) x.re)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	40.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) x.im) (/.f64 (.f64 x.re x.re) x.im) #s(literal 1 binary64)) x.im)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	43.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.re)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
▶	39.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.im)) y.re) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
	41.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.im)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	38.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re) (sin.f64 (fma.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re (/.f64 (PI.f64) #s(literal 2 binary64))))))
✓	39.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
	39.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	36.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
▶	37.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	40.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 (exp.f64 (-.f64 (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (neg.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
	32.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 (exp.f64 #s(approx (- ( (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) #s(approx (cos (+ ( (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))))
	25.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 #s(approx (- ( (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (.f64 y.re (log.f64 x.im)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 (atan2.f64 x.im x.re) y.re)))))
	25.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 (/.f64 (.f64 (.f64 x.re x.re) y.re) x.im) (/.f64 (pow.f64 x.im y.re) x.im)) #s(literal 1/2 binary64) (pow.f64 x.im y.re))) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	27.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 (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 (/.f64 (.f64 (.f64 x.im x.im) y.re) x.re) (/.f64 (pow.f64 x.re y.re) x.re)) #s(literal 1/2 binary64) (pow.f64 x.re y.re))) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
▶	31.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 (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)) (cos.f64 (*.f64 (atan2.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 (pow (exp (neg y.im)) (atan2 x.im x.re)) (+.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))
	31.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 (pow (exp (neg y.im)) (atan2 x.im x.re)) #s(literal 1 binary64)) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))
	32.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re #s(literal 1 binary64))))
✓	31.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(literal 1 binary64)))
	32.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (neg.f64 y.im) (atan2.f64 x.im x.re) #s(literal 1 binary64))))
	23.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (.f64 (neg.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)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
▶	32.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	25.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (log.f64 x.re) y.im)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	25.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	30.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 (neg.f64 x.re)))))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	18.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) #s(approx (exp (* (neg y.im) (atan2 x.im x.re))) (fma.f64 (neg.f64 y.im) (atan2.f64 x.im x.re) #s(literal 1 binary64))))))
	18.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) #s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(literal 1 binary64)))))
	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)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 #s(approx (cos (neg ( y.im (log (/ -1 x.re))))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im y.im)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) #s(literal 1 binary64))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	53.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 #s(approx (cos (neg ( y.im (log (/ -1 x.re))))) #s(literal 1 binary64)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))

Compiler

Compiled 5 902 to 3 063 computations (48.1% saved)

series269.0ms (2.5%)

Memory

-13.6MiB live, 336.3MiB allocated; 86ms collecting garbage

Counts

39 → 292

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
86.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)))) (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im (/ y.re 2) y.re 2 (cos (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* (atan2 x.im 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg 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)))) (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) (cos (* (neg y.im) (log (/ -1 x.im)))) (* (neg y.im) (log (/ -1 x.im))) (neg y.im) y.im (log (/ -1 x.im)) (/ -1 x.im) -1 (exp (* (neg y.im) (atan2 x.im x.re))) (* (neg y.im) (atan2 x.im x.re)))
32.0ms	x.im	@	-inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im (/ y.re 2) y.re 2 (cos (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* (atan2 x.im 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg 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)))) (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) (cos (* (neg y.im) (log (/ -1 x.im)))) (* (neg y.im) (log (/ -1 x.im))) (neg y.im) y.im (log (/ -1 x.im)) (/ -1 x.im) -1 (exp (* (neg y.im) (atan2 x.im x.re))) (* (neg y.im) (atan2 x.im x.re)))
30.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)))) (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im (/ y.re 2) y.re 2 (cos (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* (atan2 x.im 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg 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)))) (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) (cos (* (neg y.im) (log (/ -1 x.im)))) (* (neg y.im) (log (/ -1 x.im))) (neg y.im) y.im (log (/ -1 x.im)) (/ -1 x.im) -1 (exp (* (neg y.im) (atan2 x.im x.re))) (* (neg y.im) (atan2 x.im x.re)))
20.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)))) (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im (/ y.re 2) y.re 2 (cos (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* (atan2 x.im 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg 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)))) (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) (cos (* (neg y.im) (log (/ -1 x.im)))) (* (neg y.im) (log (/ -1 x.im))) (neg y.im) y.im (log (/ -1 x.im)) (/ -1 x.im) -1 (exp (* (neg y.im) (atan2 x.im x.re))) (* (neg y.im) (atan2 x.im x.re)))
17.0ms	x.re	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im (/ y.re 2) y.re 2 (cos (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* (atan2 x.im 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re 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)))) (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg 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)))) (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) (cos (* (neg y.im) (log (/ -1 x.im)))) (* (neg y.im) (log (/ -1 x.im))) (neg y.im) y.im (log (/ -1 x.im)) (/ -1 x.im) -1 (exp (* (neg y.im) (atan2 x.im x.re))) (* (neg y.im) (atan2 x.im x.re)))

simplify259.0ms (2.4%)

Memory

12.4MiB live, 330.7MiB allocated; 68ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2060	23049
1	6739	22545
0	8287	19754

Stop Event

1×	iter limit
1×	node limit

Counts

292 → 292

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

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)))) (.f64 (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (cos.f64 (fma.f64 (log.f64 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))))) (* (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)))) (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 y.re (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) y.im))) (.f64 x.im x.im)) (.f64 x.re x.re) (.f64 (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (cos.f64 (fma.f64 (log.f64 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))))) (* (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)))) (fma.f64 (+.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 y.re (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) y.im))) (.f64 x.im x.im)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 y.im y.re) (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (.f64 #s(literal 1/4 binary64) (.f64 y.im (/.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))))) (.f64 x.re x.re))) (.f64 x.re x.re) (.f64 (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (cos.f64 (fma.f64 (log.f64 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))))) (* (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (+.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 y.re (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) y.im))) (.f64 x.im x.im)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 y.im y.re) (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (+.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64)))) y.im) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 y.re (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (.f64 #s(literal 1/4 binary64) (.f64 y.im (/.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.im #s(literal 4 binary64))))))))) (.f64 x.im x.im)) (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/8 binary64) (.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) y.im (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) y.re (.f64 #s(literal 1/48 binary64) (pow.f64 y.re #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 x.re x.re) (.f64 (fma.f64 (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (.f64 #s(literal 1/4 binary64) (.f64 y.im (/.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (.f64 x.re x.re))) (.f64 x.re x.re) (.f64 (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.im)))) 2))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.im)))) 2)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.im)))) 2)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.im)))) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.im)))) 2))) (pow x.im 2))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/16 (/ (* (pow y.re 2) (pow (exp (* 1/2 (* y.re (log x.im)))) 2)) (pow x.im 4))) (* 2 (* (pow (exp (* 1/2 (* y.re (log x.im)))) 2) (+ (* -1/8 (/ y.re (pow x.im 4))) (* 1/32 (/ (pow y.re 2) (pow x.im 4))))))))))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (.f64 y.re (/.f64 (.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 y.re y.re)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/16 binary64))))) (.f64 x.re x.re) (.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.im)))) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.im)))) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/16 (/ (* (pow y.re 2) (pow (exp (* 1/2 (* y.re (log x.im)))) 2)) (pow x.im 4))) (* 2 (* (pow (exp (* 1/2 (* y.re (log x.im)))) 2) (+ (* -1/8 (/ y.re (pow x.im 4))) (* 1/32 (/ (pow y.re 2) (pow x.im 4)))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (exp (* 1/2 (* y.re (log x.im)))) 2) (+ (* -1/8 (/ y.re (pow x.im 4))) (* 1/32 (/ (pow y.re 2) (pow x.im 4)))))) (pow x.im 2))) (* 2 (* (pow (exp (* 1/2 (* y.re (log x.im)))) 2) (+ (* -1/32 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/384 (/ (pow y.re 3) (pow x.im 6))) (* 1/12 (/ y.re (pow x.im 6)))))))))))))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 x.re x.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (.f64 y.re (/.f64 (.f64 (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/12 binary64) y.re (.f64 #s(literal 1/384 binary64) (pow.f64 y.re #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))) (.f64 (fma.f64 (.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 y.re y.re)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/16 binary64))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.re x.re) (.f64 (.f64 y.re (/.f64 (.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 x.im x.im))) #s(literal 1/2 binary64))) (.f64 x.re x.re) (.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (pow (exp (* 1/2 (* y.re (log x.im)))) 2)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (exp (* 1/2 (* y.re (log x.im)))) 2))) (pow x.im 2))) (pow (exp (* 1/2 (* y.re (log x.im)))) 2))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (exp (* 1/2 (* y.re (log x.im)))) 2)) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/16 (/ (* (pow y.re 2) (pow (exp (* 1/2 (* y.re (log x.im)))) 2)) (pow x.im 4))) (* 2 (* (pow (exp (* 1/2 (* y.re (log x.im)))) 2) (+ (* -1/8 (/ y.re (pow x.im 4))) (* 1/32 (/ (pow y.re 2) (pow x.im 4)))))))))) (pow (exp (* 1/2 (* y.re (log x.im)))) 2))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (fma.f64 (.f64 y.re (/.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (fma.f64 (.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 y.re y.re)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/16 binary64))) (.f64 x.re x.re))) (*.f64 x.re x.re) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (exp (* 1/2 (* y.re (log x.im)))) 2)) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/16 (/ (* (pow y.re 2) (pow (exp (* 1/2 (* y.re (log x.im)))) 2)) (pow x.im 4))) (+ (* 2 (* (pow (exp (* 1/2 (* y.re (log x.im)))) 2) (+ (* -1/8 (/ y.re (pow x.im 4))) (* 1/32 (/ (pow y.re 2) (pow x.im 4)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (exp (* 1/2 (* y.re (log x.im)))) 2) (+ (* -1/8 (/ y.re (pow x.im 4))) (* 1/32 (/ (pow y.re 2) (pow x.im 4)))))) (pow x.im 2))) (* 2 (* (pow (exp (* 1/2 (* y.re (log x.im)))) 2) (+ (* -1/32 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/384 (/ (pow y.re 3) (pow x.im 6))) (* 1/12 (/ y.re (pow x.im 6)))))))))))))) (pow (exp (* 1/2 (* y.re (log x.im)))) 2))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 y.re y.re)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/16 binary64) (fma.f64 (fma.f64 (.f64 y.re (/.f64 (.f64 (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/12 binary64) y.re (.f64 #s(literal 1/384 binary64) (pow.f64 y.re #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))) (.f64 x.re x.re) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 x.re x.re) (.f64 (.f64 y.re (/.f64 (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 x.im x.im))) #s(literal 1/2 binary64))) (*.f64 x.re x.re) (pow.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (exp (* 1/2 (* y.re (log x.im))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* 1/2 (* y.re (log x.im)))) (* 1/4 (/ (* (pow x.re 2) (* y.re (exp (* 1/2 (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64))) (.f64 x.im x.im)) #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* 1/2 (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (exp (* 1/2 (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (* 1/2 (* y.re (log x.im)))) (+ (* -1/8 (/ y.re (pow x.im 4))) (* 1/32 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (fma.f64 (.f64 (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64))) (.f64 x.re x.re) (.f64 (.f64 y.re (/.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) (.f64 x.im x.im))) #s(literal 1/4 binary64))) (.f64 x.re x.re) (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* 1/2 (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (exp (* 1/2 (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (* 1/2 (* y.re (log x.im)))) (+ (* -1/8 (/ y.re (pow x.im 4))) (* 1/32 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (* 1/2 (* y.re (log x.im)))) (+ (* -1/32 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/384 (/ (pow y.re 3) (pow x.im 6))) (* 1/12 (/ y.re (pow x.im 6))))))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 x.re x.re) (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/12 binary64) y.re (.f64 #s(literal 1/384 binary64) (pow.f64 y.re #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)))) (.f64 x.re x.re) (.f64 (.f64 y.re (/.f64 (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64)) (.f64 x.im x.im))) #s(literal 1/4 binary64))) (.f64 x.re x.re) (pow.f64 (pow.f64 x.im y.re) #s(literal 1/2 binary64))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) 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.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) #s(literal 1/2 binary64) 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.im x.im) (* x.re x.re))) (fma.f64 (fma.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) x.im)) (.f64 x.re x.re) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.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 x.re x.re) (/.f64 #s(literal 1/2 binary64) x.im)) (.f64 x.re x.re) x.im))
#s(approx x.re #s(hole binary64 x.re))
#s(approx x.re x.re)
#s(approx (cos (* (atan2 x.im x.re) y.re)) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (* (atan2 x.im x.re) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (pow.f64 x.im y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (pow.f64 x.im y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (pow.f64 x.im y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (.f64 (.f64 (pow.f64 x.im y.re) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64)))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 x.re x.re) (.f64 (.f64 y.re (/.f64 (.f64 (pow.f64 x.im y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 x.im x.im))) #s(literal 1/2 binary64))) (.f64 x.re x.re) (.f64 (pow.f64 x.im y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 x.re x.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (pow.f64 x.im y.re) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) y.re (.f64 #s(literal 1/48 binary64) (pow.f64 y.re #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 (.f64 (pow.f64 x.im y.re) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64)))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.re x.re) (.f64 (.f64 y.re (/.f64 (.f64 (pow.f64 x.im y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 x.im x.im))) #s(literal 1/2 binary64))) (.f64 x.re x.re) (.f64 (pow.f64 x.im y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.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) (pow.f64 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) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im y.re)) (.f64 x.im x.im)) #s(literal 1/2 binary64) (pow.f64 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) (fma.f64 (fma.f64 (.f64 (pow.f64 x.im y.re) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 x.re x.re) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im y.re) y.re)) (.f64 x.im x.im))) (.f64 x.re x.re) (pow.f64 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 x.re x.re) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) y.re (.f64 #s(literal 1/48 binary64) (pow.f64 y.re #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re) (.f64 (pow.f64 x.im y.re) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 x.re x.re) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im y.re) y.re)) (.f64 x.im x.im))) (.f64 x.re x.re) (pow.f64 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))) 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))) (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) #s(literal 1/2 binary64) 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))) (fma.f64 (fma.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) x.im)) (.f64 x.re x.re) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.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 x.re x.re) (/.f64 #s(literal 1/2 binary64) x.im)) (.f64 x.re x.re) x.im))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (* (cos (* y.im (log x.im))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (cos.f64 (.f64 (log.f64 x.im) y.im))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))) (pow x.im 2))) (* (cos (* y.im (log x.im))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (.f64 (log.f64 x.im) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) #s(literal -1/2 binary64) (.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (cos.f64 (.f64 (log.f64 x.im) y.im)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (fma.f64 (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (.f64 (cos.f64 (.f64 (log.f64 x.im) y.im)) (.f64 y.im y.im)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (.f64 #s(literal 1/4 binary64) (.f64 y.im (/.f64 (sin.f64 (.f64 (log.f64 x.im) y.im)) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (.f64 (log.f64 x.im) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (.f64 x.im x.im))) #s(literal -1/2 binary64))) (.f64 x.re x.re) (.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (cos.f64 (.f64 (log.f64 x.im) y.im)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))))) (* (pow x.re 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (.f64 (cos.f64 (.f64 (log.f64 x.im) y.im)) (.f64 y.im y.im)) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/8 binary64) (.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) y.im (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (sin.f64 (.f64 (log.f64 x.im) y.im)))) (.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (.f64 (log.f64 x.im) y.im)) (.f64 y.im y.im)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (.f64 #s(literal 1/4 binary64) (.f64 y.im (/.f64 (sin.f64 (.f64 (log.f64 x.im) y.im)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.re x.re) (.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (.f64 (log.f64 x.im) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (.f64 x.im x.im))) #s(literal -1/2 binary64))) (.f64 x.re x.re) (.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (cos.f64 (.f64 (log.f64 x.im) y.im)))))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))
#s(approx (* (neg y.im) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* (neg y.im) (atan2 x.im 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)))) #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)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.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)))) #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)))) (+.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 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) y.re) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))))))) (.f64 x.re x.re)) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.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)))) #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)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) #s(literal -1/2 binary64) (fma.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (/.f64 (.f64 (.f64 y.im y.re) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) #s(literal -1/4 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (*.f64 y.im (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)))) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) #s(literal -1/2 binary64) (fma.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (/.f64 (.f64 (.f64 y.im y.re) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) #s(literal -1/4 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/720 binary64)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (-.f64 (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 1/8 binary64)) (.f64 (fma.f64 (.f64 #s(literal 1/720 binary64) y.im) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.im #s(literal 3 binary64)))) (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2)))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/16 (* (pow x.im 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2)))) (* 2 (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 4))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (.f64 y.re y.re)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2)))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/16 (* (pow x.im 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2)))) (* 2 (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2)))))))) (* 2 (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2) (+ (* -1/32 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/1440 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/384 (* (pow x.im 6) (pow y.re 3))))))))) (pow x.re 6)))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (fma.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))) y.re) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/384 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) y.re)))) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (.f64 y.re y.re)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (pow.f64 (pow.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2))) (pow x.re 2))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/16 (/ (* (pow x.im 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2))) (pow x.re 2))) (+ (* 2 (/ (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64)))) #s(literal 2 binary64) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/16 (/ (* (pow x.im 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2))) (pow x.re 2))) (+ (* 2 (/ (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))) (+ (* 2 (/ (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2) (+ (* -1/32 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/1440 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/384 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.re))))) 2))))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64)))) #s(literal 2 binary64) (fma.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/384 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) y.re)))) (pow.f64 x.re #s(literal 6 binary64)))) #s(literal 2 binary64) (pow.f64 (pow.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (exp (* -1/2 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (pow.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* -1/2 (* y.re (log (/ 1 x.re))))) (* 1/4 (/ (* (pow x.im 2) (* y.re (exp (* -1/2 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) #s(literal 1/4 binary64) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* -1/2 (* y.re (log (/ 1 x.re))))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (exp (* -1/2 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1/2 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) #s(literal 1/4 binary64) (.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* -1/2 (* y.re (log (/ 1 x.re))))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (exp (* -1/2 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1/2 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1/2 (* y.re (log (/ 1 x.re))))) (+ (* -1/32 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/1440 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/384 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) #s(literal 1/4 binary64) (fma.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/384 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) y.re)))) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) y.re)) (neg.f64 (log.f64 x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) 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.im x.im) (* x.re x.re))) (.f64 (fma.f64 (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64) #s(literal 1 binary64)) x.re))
#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.im x.im) (* x.re x.re))) (.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)) (.f64 x.re x.re))) #s(literal 1 binary64)) x.re))
#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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)) (.f64 x.re x.re)))) #s(literal 1 binary64)) x.re))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (fma.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/720 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (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) #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) (exp.f64 (neg.f64 (*.f64 (neg.f64 (log.f64 x.re)) y.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) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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))) (/ (* (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) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64))))) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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))) (+ (/ (* (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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/720 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (neg.f64 (*.f64 (neg.f64 (log.f64 x.re)) y.re)))))
#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))) 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))) (.f64 (fma.f64 (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64) #s(literal 1 binary64)) x.re))
#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))) (.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)) (.f64 x.re x.re))) #s(literal 1 binary64)) x.re))
#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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)) (.f64 x.re x.re)))) #s(literal 1 binary64)) x.re))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re)))))))))) (pow x.re 4))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (sin.f64 (.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re)))))))))) (pow x.re 4)) (/ (* (exp (* -1 (* 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)))))))) (* (sin (* -1 (* y.im (log (/ 1 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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (fma.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (sin.f64 (.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)) (.f64 y.im y.im)) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (PI.f64))) (fma.f64 (.f64 #s(literal 1/720 binary64) y.im) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 (*.f64 #s(literal -1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.im #s(literal 3 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))) (cos (+ (* (log (sqrt (+ (* x.re x.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)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.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)))) #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)))) (+.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.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) y.re) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))))))) (.f64 x.re x.re)) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.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)))) #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)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.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(literal -1/2 binary64) (fma.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (/.f64 (.f64 (.f64 y.im y.re) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) #s(literal -1/4 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.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(literal 1/2 binary64) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (fma.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (*.f64 y.im (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)))) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.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(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) #s(literal -1/2 binary64) (fma.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (/.f64 (.f64 (.f64 y.im y.re) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) #s(literal -1/4 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.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(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/720 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (-.f64 (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 1/8 binary64)) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (.f64 #s(literal 1/720 binary64) y.im) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.im #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2)))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/16 (* (pow x.im 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2)))) (* 2 (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 4))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (.f64 y.re y.re)) (.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re)))) #s(literal 2 binary64))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2)))) (pow x.re 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/16 (* (pow x.im 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2)))) (* 2 (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2)))))))) (* 2 (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2) (+ (* -1/32 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/1440 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/384 (* (pow x.im 6) (pow y.re 3))))))))) (pow x.re 6)))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (fma.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (fma.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (.f64 y.re y.re)) (.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re)))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)) (.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re)))) y.re) (.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/384 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 #s(literal 1/1440 binary64) (.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) y.re))))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 6 binary64))))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (pow.f64 (pow.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2))) (pow x.re 2))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/16 (/ (* (pow x.im 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2))) (pow x.re 2))) (+ (* 2 (/ (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64)))) #s(literal 2 binary64) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/16 (/ (* (pow x.im 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2))) (pow x.re 2))) (+ (* 2 (/ (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))) (+ (* 2 (/ (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2) (+ (* -1/32 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/1440 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/384 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.re))))) 2))))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64)))) #s(literal 2 binary64) (fma.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/384 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) y.re)))) (pow.f64 x.re #s(literal 6 binary64)))) #s(literal 2 binary64) (pow.f64 (pow.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (exp (* -1/2 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (pow.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* -1/2 (* y.re (log (/ -1 x.re))))) (* 1/4 (/ (* (pow x.im 2) (* y.re (exp (* -1/2 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) #s(literal 1/4 binary64) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* -1/2 (* y.re (log (/ -1 x.re))))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (exp (* -1/2 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1/2 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) #s(literal 1/4 binary64) (.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* -1/2 (* y.re (log (/ -1 x.re))))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (exp (* -1/2 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1/2 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 4) y.re)) (* 1/32 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1/2 (* y.re (log (/ -1 x.re))))) (+ (* -1/32 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/1440 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/384 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) #s(literal 1/4 binary64) (fma.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/384 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 #s(literal 1/1440 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) y.re)))) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 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.im x.im) (* x.re x.re))) (.f64 (neg.f64 x.re) (fma.f64 (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
#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.im x.im) (* x.re x.re))) (.f64 (neg.f64 x.re) (+.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)) (.f64 x.re x.re))) #s(literal 1 binary64))))
#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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 (neg.f64 x.re) (+.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)) (.f64 x.re x.re)))) #s(literal 1 binary64))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (fma.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/720 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (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) #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) (exp.f64 (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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))) (/ (* (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) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64))))) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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))) (+ (/ (* (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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/720 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)))))
#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))) (neg.f64 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))) (.f64 (neg.f64 x.re) (fma.f64 (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
#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))) (.f64 (neg.f64 x.re) (+.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)) (.f64 x.re x.re))) #s(literal 1 binary64))))
#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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 (neg.f64 x.re) (+.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)) (.f64 x.re x.re)))) #s(literal 1 binary64))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re)))))))))) (pow x.re 4))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re)))))))))) (pow x.re 4)) (/ (* (exp (* -1 (* 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)))))))) (* (sin (* -1 (* y.im (log (/ -1 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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (fma.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (sin.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)) (.f64 y.im y.im)) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (PI.f64))) (fma.f64 (.f64 #s(literal 1/720 binary64) y.im) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 (*.f64 #s(literal -1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (pow.f64 y.im #s(literal 3 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))) (cos (+ (* (log (sqrt (+ (* x.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)))) (.f64 (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (cos.f64 (fma.f64 (log.f64 x.re) 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.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)))) (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 y.re (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y.im (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))))) (.f64 x.re x.re)) (.f64 x.im x.im) (.f64 (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (cos.f64 (fma.f64 (log.f64 x.re) 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.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)))) (fma.f64 (+.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 y.re (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y.im (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))))) (.f64 x.re x.re)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 y.im y.re) (.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (.f64 #s(literal 1/4 binary64) (.f64 y.im (/.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))))) (.f64 x.im x.im))) (.f64 x.im x.im) (.f64 (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (cos.f64 (fma.f64 (log.f64 x.re) 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.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (+.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 y.re (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y.im (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))))) (.f64 x.re x.re)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 y.im y.re) (.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (+.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 y.im (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64))) (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 y.re (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (.f64 #s(literal 1/4 binary64) (.f64 y.im (/.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))))))))) (.f64 x.re x.re)) (fma.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/8 binary64) (.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) y.im (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) y.re (.f64 #s(literal 1/48 binary64) (pow.f64 y.re #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))))) (.f64 x.im x.im) (.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (.f64 #s(literal 1/4 binary64) (.f64 y.im (/.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (.f64 x.im x.im))) (.f64 x.im x.im) (.f64 (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.re)))) 2))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.re)))) 2)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.re)))) 2)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.re)))) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.re)))) 2))) (pow x.re 2))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/16 (/ (* (pow y.re 2) (pow (exp (* 1/2 (* y.re (log x.re)))) 2)) (pow x.re 4))) (* 2 (* (pow (exp (* 1/2 (* y.re (log x.re)))) 2) (+ (* -1/8 (/ y.re (pow x.re 4))) (* 1/32 (/ (pow y.re 2) (pow x.re 4))))))))))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (.f64 y.re (/.f64 (.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 y.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/16 binary64))))) (.f64 x.im x.im) (.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.re)))) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log x.re)))) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/16 (/ (* (pow y.re 2) (pow (exp (* 1/2 (* y.re (log x.re)))) 2)) (pow x.re 4))) (* 2 (* (pow (exp (* 1/2 (* y.re (log x.re)))) 2) (+ (* -1/8 (/ y.re (pow x.re 4))) (* 1/32 (/ (pow y.re 2) (pow x.re 4)))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (exp (* 1/2 (* y.re (log x.re)))) 2) (+ (* -1/8 (/ y.re (pow x.re 4))) (* 1/32 (/ (pow y.re 2) (pow x.re 4)))))) (pow x.re 2))) (* 2 (* (pow (exp (* 1/2 (* y.re (log x.re)))) 2) (+ (* -1/32 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/384 (/ (pow y.re 3) (pow x.re 6))) (* 1/12 (/ y.re (pow x.re 6)))))))))))))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 x.im x.im) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (.f64 y.re (/.f64 (.f64 (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) #s(literal -1/32 binary64) (/.f64 (fma.f64 #s(literal 1/12 binary64) y.re (.f64 #s(literal 1/384 binary64) (pow.f64 y.re #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))) (.f64 (fma.f64 (.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 y.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/16 binary64))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im) (.f64 (.f64 y.re (/.f64 (.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 x.re x.re))) #s(literal 1/2 binary64))) (.f64 x.im x.im) (.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (pow (exp (* 1/2 (* y.re (log x.re)))) 2)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (exp (* 1/2 (* y.re (log x.re)))) 2))) (pow x.re 2))) (pow (exp (* 1/2 (* y.re (log x.re)))) 2))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (exp (* 1/2 (* y.re (log x.re)))) 2)) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/16 (/ (* (pow y.re 2) (pow (exp (* 1/2 (* y.re (log x.re)))) 2)) (pow x.re 4))) (* 2 (* (pow (exp (* 1/2 (* y.re (log x.re)))) 2) (+ (* -1/8 (/ y.re (pow x.re 4))) (* 1/32 (/ (pow y.re 2) (pow x.re 4)))))))))) (pow (exp (* 1/2 (* y.re (log x.re)))) 2))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (fma.f64 (.f64 y.re (/.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (fma.f64 (.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 y.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/16 binary64))) (.f64 x.im x.im))) (*.f64 x.im x.im) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (exp (* 1/2 (* y.re (log x.re)))) 2)) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/16 (/ (* (pow y.re 2) (pow (exp (* 1/2 (* y.re (log x.re)))) 2)) (pow x.re 4))) (+ (* 2 (* (pow (exp (* 1/2 (* y.re (log x.re)))) 2) (+ (* -1/8 (/ y.re (pow x.re 4))) (* 1/32 (/ (pow y.re 2) (pow x.re 4)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (exp (* 1/2 (* y.re (log x.re)))) 2) (+ (* -1/8 (/ y.re (pow x.re 4))) (* 1/32 (/ (pow y.re 2) (pow x.re 4)))))) (pow x.re 2))) (* 2 (* (pow (exp (* 1/2 (* y.re (log x.re)))) 2) (+ (* -1/32 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/384 (/ (pow y.re 3) (pow x.re 6))) (* 1/12 (/ y.re (pow x.re 6)))))))))))))) (pow (exp (* 1/2 (* y.re (log x.re)))) 2))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 y.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/16 binary64) (fma.f64 (fma.f64 (.f64 y.re (/.f64 (.f64 (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) #s(literal -1/32 binary64) (/.f64 (fma.f64 #s(literal 1/12 binary64) y.re (.f64 #s(literal 1/384 binary64) (pow.f64 y.re #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))) (.f64 x.im x.im) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 x.im x.im) (.f64 (.f64 y.re (/.f64 (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 x.re x.re))) #s(literal 1/2 binary64))) (*.f64 x.im x.im) (pow.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (exp (* 1/2 (* y.re (log x.re))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* 1/2 (* y.re (log x.re)))) (* 1/4 (/ (* (pow x.im 2) (* y.re (exp (* 1/2 (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64))) (.f64 x.re x.re)) #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* 1/2 (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (exp (* 1/2 (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (* 1/2 (* y.re (log x.re)))) (+ (* -1/8 (/ y.re (pow x.re 4))) (* 1/32 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (fma.f64 (.f64 (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64))) (.f64 x.im x.im) (.f64 (.f64 y.re (/.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) (.f64 x.re x.re))) #s(literal 1/4 binary64))) (.f64 x.im x.im) (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* 1/2 (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (exp (* 1/2 (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (* 1/2 (* y.re (log x.re)))) (+ (* -1/8 (/ y.re (pow x.re 4))) (* 1/32 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (* 1/2 (* y.re (log x.re)))) (+ (* -1/32 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/384 (/ (pow y.re 3) (pow x.re 6))) (* 1/12 (/ y.re (pow x.re 6))))))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 x.im x.im) (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) #s(literal -1/32 binary64) (/.f64 (fma.f64 #s(literal 1/12 binary64) y.re (.f64 #s(literal 1/384 binary64) (pow.f64 y.re #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (/.f64 (fma.f64 #s(literal 1/32 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/8 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)))) (.f64 x.im x.im) (.f64 (.f64 y.re (/.f64 (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64)) (.f64 x.re x.re))) #s(literal 1/4 binary64))) (.f64 x.im x.im) (pow.f64 (pow.f64 x.re y.re) #s(literal 1/2 binary64))))
#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.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (*.f64 x.im x.im) x.re) #s(literal 1/2 binary64) 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.im x.im) (* x.re x.re))) (fma.f64 (fma.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) x.re)) (.f64 x.im x.im) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.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 x.im x.im) (/.f64 #s(literal 1/2 binary64) x.re)) (.f64 x.im x.im) x.re))
#s(approx x.im #s(hole binary64 x.im))
#s(approx x.im x.im)
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (pow.f64 x.re y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (pow.f64 x.re y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (pow.f64 x.re y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (.f64 (.f64 (pow.f64 x.re y.re) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64)))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 x.im x.im) (.f64 (.f64 y.re (/.f64 (.f64 (pow.f64 x.re y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 x.re x.re))) #s(literal 1/2 binary64))) (.f64 x.im x.im) (.f64 (pow.f64 x.re y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 x.im x.im) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (pow.f64 x.re y.re) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) y.re (.f64 #s(literal 1/48 binary64) (pow.f64 y.re #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 (.f64 (pow.f64 x.re y.re) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64)))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im) (.f64 (.f64 y.re (/.f64 (.f64 (pow.f64 x.re y.re) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 x.re x.re))) #s(literal 1/2 binary64))) (.f64 x.im x.im) (.f64 (pow.f64 x.re y.re) (cos.f64 (.f64 (atan2.f64 x.im 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) (pow.f64 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) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re y.re)) (.f64 x.re x.re)) #s(literal 1/2 binary64) (pow.f64 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) (fma.f64 (fma.f64 (.f64 (pow.f64 x.re y.re) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 x.im x.im) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re y.re) y.re)) (.f64 x.re x.re))) (.f64 x.im x.im) (pow.f64 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 x.im x.im) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal 1/6 binary64) y.re (.f64 #s(literal 1/48 binary64) (pow.f64 y.re #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re) (.f64 (pow.f64 x.re y.re) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 y.re y.re) (.f64 #s(literal -1/4 binary64) y.re)) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 x.im x.im) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re y.re) y.re)) (.f64 x.re x.re))) (.f64 x.im x.im) (pow.f64 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))) (fma.f64 (/.f64 (*.f64 x.im x.im) x.re) #s(literal 1/2 binary64) 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))) (fma.f64 (fma.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) x.re)) (.f64 x.im x.im) 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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.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 x.im x.im) (/.f64 #s(literal 1/2 binary64) x.re)) (.f64 x.im x.im) x.re))
#s(approx (neg x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (neg x.im) (neg.f64 x.im))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (* (cos (* y.im (log x.re))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (log.f64 x.re) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))) (pow x.re 2))) (* (cos (* y.im (log x.re))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sin.f64 (.f64 (log.f64 x.re) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 (log.f64 x.re) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* (cos (* y.im (log x.re))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (fma.f64 (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (.f64 (cos.f64 (.f64 (log.f64 x.re) y.im)) (.f64 y.im y.im)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (.f64 #s(literal 1/4 binary64) (.f64 y.im (/.f64 (sin.f64 (.f64 (log.f64 x.re) y.im)) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (.f64 (log.f64 x.re) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (.f64 x.re x.re))) #s(literal -1/2 binary64))) (.f64 x.im x.im) (.f64 (cos.f64 (.f64 (log.f64 x.re) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* (cos (* y.im (log x.re))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))))) (* (pow x.im 2) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (.f64 (cos.f64 (.f64 (log.f64 x.re) y.im)) (.f64 y.im y.im)) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/8 binary64) (.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) y.im (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (sin.f64 (.f64 (log.f64 x.re) y.im)))) (.f64 (fma.f64 (/.f64 (.f64 (cos.f64 (.f64 (log.f64 x.re) y.im)) (.f64 y.im y.im)) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (.f64 #s(literal 1/4 binary64) (.f64 y.im (/.f64 (sin.f64 (.f64 (log.f64 x.re) y.im)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.im x.im) (.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (.f64 (log.f64 x.re) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (.f64 x.re x.re))) #s(literal -1/2 binary64))) (.f64 x.im x.im) (.f64 (cos.f64 (.f64 (log.f64 x.re) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* -1 (* y.im (+ (log -1) (* -1 (log x.im)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) (.f64 (cos.f64 (.f64 (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (log.f64 #s(literal -1 binary64))) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) #s(hole binary64 (cos (* -1 (* y.im (+ (log -1) (* -1 (log x.im))))))))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) (cos.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (log.f64 #s(literal -1 binary64))) y.im)))
#s(approx (* (neg y.im) (log (/ -1 x.im))) #s(hole binary64 (* -1 (* y.im (+ (log -1) (* -1 (log x.im)))))))
#s(approx (* (neg y.im) (log (/ -1 x.im))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (log.f64 #s(literal -1 binary64)))))
#s(approx (log (/ -1 x.im)) #s(hole binary64 (+ (log -1) (* -1 (log x.im)))))
#s(approx (log (/ -1 x.im)) (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (log.f64 #s(literal -1 binary64))))
#s(approx (/ -1 x.im) #s(hole binary64 (/ -1 x.im)))
#s(approx (/ -1 x.im) (/.f64 #s(literal -1 binary64) x.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(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)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -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)))) (+.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 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) y.re) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))))))) (.f64 x.im x.im)) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -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)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) #s(literal -1/2 binary64) (fma.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (/.f64 (.f64 (.f64 y.im y.re) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re)))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (*.f64 (atan2.f64 x.im x.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))) (cos (+ (* (log (sqrt (+ (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re))) (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) #s(literal -1/2 binary64) (fma.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (/.f64 (.f64 (.f64 y.im y.re) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re)))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/720 binary64)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im))) (.f64 (fma.f64 (.f64 #s(literal 1/720 binary64) y.im) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.im #s(literal 3 binary64)))) (sin.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) y.re))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2)))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/16 (* (pow x.re 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2)))) (* 2 (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 4))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64))) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re)))) #s(literal 2 binary64) (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (.f64 y.re y.re)))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2)))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/16 (* (pow x.re 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2)))) (* 2 (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2)))))))) (* 2 (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2) (+ (* -1/32 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/1440 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/384 (* (pow x.re 6) (pow y.re 3))))))))) (pow x.im 6)))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (fma.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)) (.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) y.re) (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64)))) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re)))) (fma.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/384 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/1440 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64))) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re)))) #s(literal 2 binary64) (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (.f64 y.re y.re)))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2))) (pow x.im 2))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re)))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/16 (/ (* (pow x.re 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2))) (pow x.im 2))) (+ (* 2 (/ (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (.f64 y.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re)))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/16 (/ (* (pow x.re 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2))) (pow x.im 2))) (+ (* 2 (/ (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))) (+ (* 2 (/ (* (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2) (+ (* -1/32 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/1440 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/384 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))) (pow (exp (* -1/2 (* y.re (log (/ 1 x.im))))) 2))))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (.f64 y.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64))) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))))) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64) (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/384 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/1440 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) #s(literal 2 binary64) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (log.f64 x.im)) y.re)))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (exp (* -1/2 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (*.f64 (neg.f64 (log.f64 x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* -1/2 (* y.re (log (/ 1 x.im))))) (* 1/4 (/ (* (pow x.re 2) (* y.re (exp (* -1/2 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (.f64 x.im x.im)) #s(literal 1/4 binary64) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 (neg.f64 (log.f64 x.im)) y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* -1/2 (* y.re (log (/ 1 x.im))))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (exp (* -1/2 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1/2 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (.f64 x.im x.im)) #s(literal 1/4 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 (neg.f64 (log.f64 x.im)) y.re)) (/.f64 (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 (neg.f64 (log.f64 x.im)) y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* -1/2 (* y.re (log (/ 1 x.im))))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (exp (* -1/2 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1/2 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1/2 (* y.re (log (/ 1 x.im))))) (+ (* -1/32 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/1440 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/384 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 (neg.f64 (log.f64 x.im)) y.re))) (.f64 x.im x.im)) #s(literal 1/4 binary64) (fma.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 (neg.f64 (log.f64 x.im)) y.re)) (/.f64 (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (.f64 (neg.f64 (log.f64 x.im)) y.re)) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/384 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/1440 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (*.f64 (neg.f64 (log.f64 x.im)) y.re))))
#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.im x.im) (* x.re x.re))) (.f64 (fma.f64 (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64) #s(literal 1 binary64)) x.im))
#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.im x.im) (* x.re x.re))) (.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)) (.f64 x.im x.im))) #s(literal 1 binary64)) x.im))
#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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)) (.f64 x.im x.im)))) #s(literal 1 binary64)) x.im))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (fma.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/720 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (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) #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) (exp.f64 (neg.f64 (*.f64 (neg.f64 (log.f64 x.im)) y.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.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) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.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.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) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.im #s(literal 4 binary64))))) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.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.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (exp.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/720 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (neg.f64 (*.f64 (neg.f64 (log.f64 x.im)) y.re)))))
#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))) (.f64 (fma.f64 (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64) #s(literal 1 binary64)) x.im))
#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))) (.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)) (.f64 x.im x.im))) #s(literal 1 binary64)) x.im))
#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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 (+.f64 (fma.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)) (.f64 x.im x.im)))) #s(literal 1 binary64)) x.im))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im)))))))))) (pow x.im 4))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (sin.f64 (.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im))))))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im)))))))))) (pow x.im 4)) (/ (* (exp (* -1 (* 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)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (fma.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)) (.f64 y.im y.im))) (.f64 (sin.f64 (.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im)))) (fma.f64 (.f64 #s(literal 1/720 binary64) y.im) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.im #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (sin.f64 (*.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.im))))))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* -1 (* y.im (+ (log -1) (log (/ 1 x.im)))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) (.f64 (cos.f64 (.f64 (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (log.f64 #s(literal -1 binary64))) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) #s(hole binary64 (cos (* -1 (* y.im (+ (log -1) (log (/ 1 x.im))))))))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) (cos.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (log.f64 #s(literal -1 binary64))) y.im)))
#s(approx (* (neg y.im) (log (/ -1 x.im))) #s(hole binary64 (* -1 (* y.im (+ (log -1) (log (/ 1 x.im)))))))
#s(approx (* (neg y.im) (log (/ -1 x.im))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (log.f64 #s(literal -1 binary64)))))
#s(approx (log (/ -1 x.im)) #s(hole binary64 (+ (log -1) (log (/ 1 x.im)))))
#s(approx (log (/ -1 x.im)) (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (log.f64 #s(literal -1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(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)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 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 (+ (* -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)))) (+.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.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) y.re) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))))))) (.f64 x.im x.im)) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 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 (+ (* -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)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.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(literal -1/2 binary64) (fma.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (/.f64 (.f64 (.f64 y.im y.re) (.f64 (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) #s(literal -1/4 binary64) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.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(literal 1/2 binary64) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (fma.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re)))) (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re)))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (*.f64 y.im (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)))) #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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.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(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (.f64 (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) #s(literal -1/2 binary64) (fma.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (/.f64 (.f64 (.f64 y.im y.re) (.f64 (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) #s(literal -1/4 binary64) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.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(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re)))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/720 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (-.f64 (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 1/8 binary64)) (.f64 (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (.f64 (atan2.f64 x.im x.re) y.re))) (fma.f64 (.f64 #s(literal 1/720 binary64) y.im) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.im #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2)))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/16 (* (pow x.re 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2)))) (* 2 (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 4))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (.f64 y.re y.re)) (.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64)))) #s(literal 2 binary64))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2)))) (pow x.im 2))) (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/16 (* (pow x.re 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2)))) (* 2 (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2)))))))) (* 2 (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2) (+ (* -1/32 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/1440 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/384 (* (pow x.re 6) (pow y.re 3))))))))) (pow x.im 6)))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (fma.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)) (.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64)))) y.re) (.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/384 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/1440 binary64))))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (.f64 y.re y.re)) (.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64)))) #s(literal 2 binary64))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (pow.f64 (pow.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2))) (pow x.im 2))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/16 (/ (* (pow x.re 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2))) (pow x.im 2))) (+ (* 2 (/ (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ (* 1/16 (/ (* (pow x.re 4) (* (pow y.re 2) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2))) (pow x.im 2))) (+ (* 2 (/ (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))) (+ (* 2 (/ (* (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2) (+ (* -1/32 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/1440 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/384 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))) (pow (exp (* -1/2 (* y.re (log (/ -1 x.im))))) 2))))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64) (fma.f64 (.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/384 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/1440 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) #s(literal 2 binary64) (pow.f64 (pow.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (exp (* -1/2 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (pow.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* -1/2 (* y.re (log (/ -1 x.im))))) (* 1/4 (/ (* (pow x.re 2) (* y.re (exp (* -1/2 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) #s(literal 1/4 binary64) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* -1/2 (* y.re (log (/ -1 x.im))))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (exp (* -1/2 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1/2 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) #s(literal 1/4 binary64) (.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ (exp (* -1/2 (* y.re (log (/ -1 x.im))))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (exp (* -1/2 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1/2 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 4) y.re)) (* 1/32 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1/2 (* y.re (log (/ -1 x.im))))) (+ (* -1/32 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/1440 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/384 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) #s(literal 1/4 binary64) (fma.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (fma.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1/8 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (pow.f64 (exp.f64 (.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (fma.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/384 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/1440 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) y.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 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.im x.im) (* x.re x.re))) (.f64 (neg.f64 x.im) (fma.f64 (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
#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.im x.im) (* x.re x.re))) (.f64 (neg.f64 x.im) (+.f64 (fma.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)) (.f64 x.im x.im))) #s(literal 1 binary64))))
#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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 (neg.f64 x.im) (+.f64 (fma.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)) (.f64 x.im x.im)))) #s(literal 1 binary64))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.re (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.re (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.re (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (fma.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/720 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (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) #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) (exp.f64 (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.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.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) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.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.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) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.im #s(literal 4 binary64))))) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.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.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) y.re (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 y.re y.re))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 y.re y.re) (fma.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.re #s(literal 3 binary64)) (.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) #s(literal 1/720 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)))))
#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))) (neg.f64 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))) (.f64 (neg.f64 x.im) (fma.f64 (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
#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))) (.f64 (neg.f64 x.im) (+.f64 (fma.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)) (.f64 x.im x.im))) #s(literal 1 binary64))))
#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 (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 (neg.f64 x.im) (+.f64 (fma.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/16 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)) (.f64 x.im x.im)))) #s(literal 1 binary64))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im)))))))))) (pow x.im 4))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (sin.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (exp (* -1 (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* 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)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im)))))))))) (pow x.im 4)) (/ (* (exp (* -1 (* 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)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sin.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (fma.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)) (.f64 y.im y.im)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (sin.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (/.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)) (.f64 y.im y.im)) (.f64 (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (PI.f64))) (fma.f64 (.f64 #s(literal 1/720 binary64) y.im) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 (*.f64 #s(literal -1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (pow.f64 y.im #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))))))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) #s(hole binary64 (cos (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) (cos.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))
#s(approx (* (neg y.im) (log (/ -1 x.im))) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (neg y.im) (log (/ -1 x.im))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im)))
#s(approx (log (/ -1 x.im)) #s(hole binary64 (log (/ -1 x.im))))
#s(approx (log (/ -1 x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(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)))) (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(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)))) (fma.f64 (fma.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (neg.f64 (.f64 (.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (sin.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))) (atan2.f64 x.im x.re)))) y.re (.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(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)))) (fma.f64 (fma.f64 (.f64 (.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (sin.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))) (atan2.f64 x.im x.re)) #s(literal -1 binary64) (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))) (atan2.f64 x.im x.re)) (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))))) y.re (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))) y.re (.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (+.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))) (atan2.f64 x.im x.re)) (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))) (.f64 (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))) (atan2.f64 x.im x.re)) (.f64 #s(literal 1/6 binary64) (fma.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (pow.f64 (exp.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 (.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (sin.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) y.re (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))))) y.re (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)))) (neg.f64 (.f64 (.f64 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (sin.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))) (atan2.f64 x.im x.re)))) y.re (.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 1))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(literal 1 binary64))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re #s(literal 1 binary64)))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im 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 (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal -1/2 binary64))) y.re (log.f64 (hypot.f64 x.im x.re))) y.re #s(literal 1 binary64)))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im 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/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/8 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) #s(literal 1/6 binary64))) y.re (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) y.re (log.f64 (hypot.f64 x.im x.re))) y.re #s(literal 1 binary64)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 1))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(literal 1 binary64))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re #s(literal 1 binary64)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #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 (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) y.re) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (log.f64 (hypot.f64 x.im x.re))) y.re #s(literal 1 binary64)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (+ 1 (* y.re (+ (log (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)) (* y.re (+ (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/8 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (fma.f64 (fma.f64 (fma.f64 (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) #s(literal 1/6 binary64)) y.re (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) #s(literal 1/2 binary64))) y.re (log.f64 (hypot.f64 x.im x.re))) y.re #s(literal 1 binary64)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ 1 (* 1/2 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (hypot.f64 x.im x.re)) #s(literal 1 binary64)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ 1 (* y.re (+ (* 1/8 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/2 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (fma.f64 (.f64 #s(literal 1/8 binary64) y.re) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 1/2 binary64))) y.re #s(literal 1 binary64)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (+ 1 (* y.re (+ (* 1/2 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* 1/48 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/8 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/48 binary64) y.re) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) #s(literal 1/8 binary64))) y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 1/2 binary64))) y.re #s(literal 1 binary64)))
#s(approx (/ y.re 2) #s(hole binary64 (* 1/2 y.re)))
#s(approx (/ y.re 2) (*.f64 #s(literal 1/2 binary64) y.re))
#s(approx y.re #s(hole binary64 y.re))
#s(approx y.re y.re)
#s(approx (cos (* (atan2 x.im x.re) y.re)) #s(hole binary64 1))
#s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))
#s(approx (cos (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* (atan2 x.im x.re) y.re)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal 1 binary64)))
#s(approx (cos (* (atan2 x.im x.re) y.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 (* (atan2 x.im x.re) y.re)) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 y.re y.re) #s(literal 1 binary64)))
#s(approx (cos (* (atan2 x.im x.re) y.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 (cos (* (atan2 x.im x.re) y.re)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) #s(literal 1/24 binary64))) (.f64 y.re y.re) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 y.re y.re) #s(literal 1 binary64)))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 1))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(literal 1 binary64))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re #s(literal 1 binary64)))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal -1/2 binary64))) y.re (log.f64 (hypot.f64 x.im x.re))) y.re #s(literal 1 binary64)))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) #s(literal 1/6 binary64))) y.re (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) y.re (log.f64 (hypot.f64 x.im x.re))) y.re #s(literal 1 binary64)))
#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(literal 1 binary64))
#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) (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re #s(literal 1 binary64)))
#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) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) y.re) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (log.f64 (hypot.f64 x.im x.re))) y.re #s(literal 1 binary64)))
#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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) y.re) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) #s(literal 1/2 binary64))) y.re (log.f64 (hypot.f64 x.im x.re))) y.re #s(literal 1 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (/.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (exp (* 1/2 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) 2))))
#s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (.f64 (pow.f64 (pow.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) #s(hole binary64 (pow (exp (* 1/2 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) 2)))
#s(approx (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (pow.f64 (pow.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) #s(hole binary64 (exp (* 1/2 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) (pow.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(literal 1/2 binary64)))
#s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) (.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.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) #s(hole binary64 (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) (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(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)))) (.f64 (cos.f64 (.f64 (atan2.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))) (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)))) (fma.f64 (.f64 #s(literal -1 binary64) (fma.f64 (.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (atan2.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re) (.f64 (.f64 (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (log.f64 (hypot.f64 x.im x.re))))) y.im (.f64 (cos.f64 (.f64 (atan2.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))) (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)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (atan2.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re) (.f64 (.f64 (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (log.f64 (hypot.f64 x.im x.re)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.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 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.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 (.f64 (.f64 (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (atan2.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (log.f64 (hypot.f64 x.im x.re))))) y.im)) y.im (.f64 (cos.f64 (.f64 (atan2.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))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (atan2.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re) (.f64 (.f64 (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (log.f64 (hypot.f64 x.im x.re)))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.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 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.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 (fma.f64 (.f64 #s(literal -1/2 binary64) (log.f64 (hypot.f64 x.im x.re))) (.f64 (.f64 (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (fma.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.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 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) #s(literal 1/6 binary64))))) y.im (.f64 (.f64 (.f64 (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (atan2.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (log.f64 (hypot.f64 x.im x.re)))))) y.im)) y.im (.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 1))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(literal 1 binary64))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (neg.f64 y.im) (atan2.f64 x.im x.re) #s(literal 1 binary64)))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal 1/2 binary64))) y.im (neg.f64 (atan2.f64 x.im x.re))) y.im #s(literal 1 binary64)))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (+ (* 1/2 (pow (atan2 x.im x.re) 2)) (* y.im (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))))))))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) #s(literal 1/2 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) y.im (neg.f64 (atan2.f64 x.im x.re))) y.im #s(literal 1 binary64)))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(literal 1 binary64))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 (neg.f64 y.im) (atan2.f64 x.im x.re) #s(literal 1 binary64)))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/2 (pow (log (/ -1 x.im)) 2)) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal 1/2 binary64))) y.im (neg.f64 (atan2.f64 x.im x.re))) y.im #s(literal 1 binary64)))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/2 (pow (log (/ -1 x.im)) 2)) (+ (* 1/2 (pow (atan2 x.im x.re) 2)) (* y.im (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)))))))))))))
#s(approx (* (cos (* (neg y.im) (log (/ -1 x.im)))) (exp (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (atan2.f64 x.im x.re) (.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) y.im (neg.f64 (atan2.f64 x.im x.re))) y.im #s(literal 1 binary64)))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) #s(hole binary64 1))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) #s(literal 1 binary64))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im y.im)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) #s(literal 1 binary64)))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log (/ -1 x.im)) 2)) (* 1/24 (* (pow y.im 2) (pow (log (/ -1 x.im)) 4))))))))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 y.im y.im)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 4 binary64)) (.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 y.im y.im) #s(literal 1 binary64)))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log (/ -1 x.im)) 2)) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (pow (log (/ -1 x.im)) 6))) (* 1/24 (pow (log (/ -1 x.im)) 4)))))))))
#s(approx (cos (* (neg y.im) (log (/ -1 x.im)))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 y.im y.im)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 6 binary64)) (.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 4 binary64)) #s(literal 1/24 binary64))) (.f64 y.im y.im) (.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 y.im y.im) #s(literal 1 binary64)))
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im)))
#s(approx (neg y.im) (neg.f64 y.im))
#s(approx y.im #s(hole binary64 y.im))
#s(approx y.im y.im)
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) (fma.f64 (neg.f64 y.im) (atan2.f64 x.im x.re) #s(literal 1 binary64)))
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) y.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (neg.f64 (atan2.f64 x.im x.re))) y.im #s(literal 1 binary64)))
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (exp (* (neg y.im) (atan2 x.im x.re))) (fma.f64 (fma.f64 (fma.f64 (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.im) #s(literal -1/6 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal 1/2 binary64))) y.im (neg.f64 (atan2.f64 x.im x.re))) y.im #s(literal 1 binary64)))
#s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) #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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))))

rewrite121.0ms (1.1%)

Memory

-20.0MiB live, 79.7MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	65	530
0	90	448
1	277	444
0	1643	439

Stop Event

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

Counts

39 → 282

Calls

Call 1

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

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

eval89.0ms (0.8%)

Memory: 44.0MiB live, 175.9MiB allocated; 15ms collecting garbage
Compiler: Compiled 53 998 to 3 520 computations (93.5% saved)

prune194.0ms (1.8%)

Memory

-18.1MiB live, 178.0MiB allocated; 31ms collecting garbage

Pruning

46 alts after pruning (41 fresh and 5 done)

	Pruned	Kept	Total
New	606	14	620
Fresh	11	27	38
Picked	2	3	5
Done	0	2	2
Total	619	46	665

Accuracy

96.7%

Counts

665 → 46

Alt Table

Click to see full alt table

Status	Accuracy	Program
	36.1%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (.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))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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))))))
	55.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (.f64 (neg.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 (hypot.f64 x.im x.re)))))))
	39.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.im)) (/.f64 y.re #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
	43.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 (pow.f64 (.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)) (/.f64 y.re #s(literal 2 binary64))) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	55.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 (hypot.f64 x.re x.im)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
	55.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (/.f64 (PI.f64) #s(literal 2 binary64))))))
	30.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) (cos.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 x.re))) y.im))))
	53.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 (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)) #s(approx (cos ( (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im)) #s(literal 1 binary64))))
	34.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (fma.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) x.re)) (.f64 x.im x.im) x.re)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	41.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.re x.re) x.im) #s(literal 1/2 binary64) x.im)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	44.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.im x.im) x.re) #s(literal 1/2 binary64) x.re)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	43.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) x.re) (/.f64 (.f64 x.im x.im) x.re) #s(literal 1 binary64)) x.re)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	40.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) x.im) (/.f64 (.f64 x.re x.re) x.im) #s(literal 1 binary64)) x.im)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	43.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.re)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
✓	39.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.im)) y.re) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
	29.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.im)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal 1 binary64)))))
	41.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.im)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
✓	39.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
	39.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	36.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
✓	37.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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	32.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 (exp.f64 #s(approx (- ( (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (.f64 (neg.f64 y.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) #s(approx (cos (+ ( (neg y.im) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))))
	25.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 #s(approx (- ( (neg y.re) (log (/ -1 x.im))) (* (atan2 x.im x.re) y.im)) (.f64 y.re (log.f64 x.im)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 (atan2.f64 x.im x.re) y.re)))))
	19.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 (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im y.re)) (.f64 x.im x.im)) #s(literal 1/2 binary64) (pow.f64 x.im y.re))) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
	19.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 (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re y.re)) (.f64 x.re x.re)) #s(literal 1/2 binary64) (pow.f64 x.re y.re))) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))
✓	31.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 (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
	34.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)) #s(approx (cos (* (atan2 x.im x.re) y.re)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal 1 binary64)))))
	31.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 (pow (exp (neg y.im)) (atan2 x.im x.re)) #s(literal 1 binary64)) (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))
	32.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ y.re 2)) 2) (cos (* (atan2 x.im x.re) y.re))) (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re #s(literal 1 binary64))))
✓	31.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(literal 1 binary64)))
	32.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (neg.f64 y.im) (atan2.f64 x.im x.re) #s(literal 1 binary64))))
	23.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (sin.f64 (fma.f64 (neg.f64 y.im) (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	30.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (neg.f64 y.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (.f64 (neg.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)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (sin.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (.f64 (neg.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)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	31.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (neg.f64 (log.f64 (neg.f64 x.im))))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	18.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(approx (exp (* (neg y.im) (atan2 x.im x.re))) (fma.f64 (neg.f64 y.im) (atan2.f64 x.im x.re) #s(literal 1 binary64))))))
	18.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (neg.f64 y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(literal 1 binary64)))))
	25.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 (log.f64 x.re) y.im)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	25.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	30.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (neg.f64 (.f64 y.im (neg.f64 (log.f64 (neg.f64 x.re)))))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	18.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) #s(approx (exp (* (neg y.im) (atan2 x.im x.re))) (fma.f64 (neg.f64 y.im) (atan2.f64 x.im x.re) #s(literal 1 binary64))))))
	18.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 (cos.f64 (neg.f64 (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) #s(approx (exp (* (neg y.im) (atan2 x.im x.re))) #s(literal 1 binary64)))))
	32.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 #s(approx (cos ( (neg y.im) (log (/ -1 x.im)))) (cos.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	53.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 #s(approx (cos ( (neg y.im) (log (/ -1 x.im)))) #s(literal 1 binary64)) (exp.f64 (*.f64 (neg.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)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 #s(approx (cos (neg ( y.im (log (/ -1 x.re))))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im y.im)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) #s(literal 1 binary64))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))

Compiler

Compiled 9 018 to 2 182 computations (75.8% saved)

regimes161.0ms (1.5%)

Memory

21.4MiB live, 201.0MiB allocated; 22ms collecting garbage

Counts

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

Calls

5 calls:

44.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))))
37.0ms	x.im
25.0ms	y.im
25.0ms	y.re
22.0ms	x.re

Results

Accuracy	Segments	Branch
80.1%	2	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
80.6%	4	`x.re`
81.9%	4	`x.im`
85.3%	3	`y.re`
82.7%	4	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes32.0ms (0.3%)

Memory

-1.2MiB live, 51.0MiB allocated; 12ms collecting garbage

Counts

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

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

Calls

1 calls:

26.0ms

y.re

Results

Accuracy	Segments	Branch
84.9%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes28.0ms (0.3%)

Memory

6.1MiB live, 49.5MiB allocated; 6ms collecting garbage

Counts

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

Outputs

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

Calls

1 calls:

22.0ms

y.re

Results

Accuracy	Segments	Branch
81.8%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes41.0ms (0.4%)

Memory

-11.6MiB live, 75.9MiB allocated; 13ms collecting garbage

Counts

66 → 3

Calls

Call 1

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

Outputs

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

Calls

2 calls:

21.0ms

y.re

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
64.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))))`
81.6%	3	`y.re`

Compiler

Compiled 38 to 23 computations (39.5% saved)

regimes87.0ms (0.8%)

Memory

-12.4MiB live, 133.8MiB allocated; 21ms collecting garbage

Counts

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

Outputs

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

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

Calls

4 calls:

31.0ms	y.im
18.0ms	x.im
18.0ms	x.re
15.0ms	y.re

Results

Accuracy	Segments	Branch
66.8%	2	`x.re`
69.6%	3	`x.im`
75.1%	3	`y.im`
78.6%	3	`y.re`

Compiler

Compiled 4 to 16 computations (-300% saved)

regimes18.0ms (0.2%)

Memory

18.9MiB live, 65.1MiB allocated; 3ms collecting garbage

Counts

48 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

14.0ms

y.re

Results

Accuracy	Segments	Branch
78.4%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes25.0ms (0.2%)

Memory

-16.1MiB live, 47.9MiB allocated; 18ms collecting garbage

Counts

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

Outputs

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

Calls

3 calls:

14.0ms	y.re
5.0ms	y.im
5.0ms	x.im

Results

Accuracy	Segments	Branch
64.1%	1	`x.im`
67.1%	2	`y.im`
64.1%	1	`y.re`

Compiler

Compiled 3 to 12 computations (-300% saved)

regimes23.0ms (0.2%)

Memory

4.2MiB live, 50.9MiB allocated; 2ms collecting garbage

Counts

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
64.0%	3	`y.re`
53.2%	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))))`
59.5%	3	`x.im`
61.5%	3	`x.re`
50.9%	3	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes5.0ms (0%)

Memory

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

Counts

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

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

Calls

1 calls:

4.0ms

y.re

Results

Accuracy	Segments	Branch
64.0%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes29.0ms (0.3%)

Memory

-33.6MiB live, 13.3MiB allocated; 2ms collecting garbage

Counts

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

Calls

2 calls:

25.0ms	y.re
3.0ms	x.re

Results

Accuracy	Segments	Branch
59.9%	3	`x.re`
57.5%	3	`y.re`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes6.0ms (0.1%)

Memory

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

Outputs

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

Calls

2 calls:

3.0ms	x.re
3.0ms	x.im

Results

Accuracy	Segments	Branch
59.5%	3	`x.im`
59.2%	3	`x.re`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes5.0ms (0.1%)

Memory

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

Counts

3 → 3

Calls

Call 1

Inputs

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

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

Calls

3 calls:

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

Results

Accuracy	Segments	Branch
57.2%	3	`y.re`
47.7%	2	`x.re`
50.3%	3	`x.im`

Compiler

Compiled 3 to 12 computations (-300% saved)

regimes2.0ms (0%)

Memory

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

Counts

2 → 3

Calls

Call 1

Inputs

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

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

Calls

1 calls:

1.0ms

y.re

Results

Accuracy	Segments	Branch
54.5%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes40.0ms (0.4%)

Memory

-33.5MiB live, 14.0MiB allocated; 1ms 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(literal 1 binary64)))

Calls

5 calls:

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

Results

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

Compiler

Compiled 41 to 35 computations (14.6% saved)

bsearch82.0ms (0.8%)

Memory

52.3MiB live, 143.4MiB allocated; 9ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
38.0ms	1.2236882030171012e-5	178386.65867166626
37.0ms	-1.0619032670598871e-21	-2.566682761213589e-27

Samples

32.0ms	73×	1	valid
28.0ms	231×	0	valid

Compiler

Compiled 1 944 to 1 317 computations (32.3% saved)

Precisions

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

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

adjust: 8.0ms (15.9% of total)

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

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

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

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

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

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

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

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

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

bsearch7.0ms (0.1%)

Memory

-31.7MiB live, 11.2MiB allocated; 6ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	1.2236882030171012e-5	178386.65867166626
2.0ms	-1.0619032670598871e-21	-2.566682761213589e-27

Compiler

Compiled 2 016 to 1 353 computations (32.9% saved)

bsearch98.0ms (0.9%)

Memory

31.9MiB live, 132.2MiB allocated; 9ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
34.0ms	8.921595401231209e-11	1.2236882030171012e-5
57.0ms	-76.4825531319768	-2.1230679687590874e-11

Samples

50.0ms	232×	0	valid
28.0ms	72×	1	valid

Compiler

Compiled 2 078 to 1 306 computations (37.2% saved)

Precisions

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

ival-log: 28.0ms (41.6% of total)

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

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

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

adjust: 4.0ms (5.9% of total)

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

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

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

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

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

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

bsearch8.0ms (0.1%)

Memory

-35.7MiB live, 7.6MiB allocated; 9ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	8.921595401231209e-11	1.2236882030171012e-5
2.0ms	-1.0619032670598871e-21	-2.566682761213589e-27

Compiler

Compiled 2 074 to 1 265 computations (39% saved)

bsearch37.0ms (0.3%)

Memory

27.1MiB live, 70.3MiB allocated; 8ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
32.0ms	8.921595401231209e-11	1.2236882030171012e-5
2.0ms	-1.0619032670598871e-21	-2.566682761213589e-27

Samples

16.0ms	96×	0	valid
10.0ms	32×	1	valid

Compiler

Compiled 2 380 to 1 337 computations (43.8% saved)

Precisions

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

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

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

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

adjust: 2.0ms (9.2% of total)

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

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

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

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

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

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

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

bsearch53.0ms (0.5%)

Memory

-20.0MiB live, 82.5MiB allocated; 14ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	8.921595401231209e-11	1.2236882030171012e-5
47.0ms	-2.1556498662043086e+35	-64540649367283.95

Samples

25.0ms	146×	0	valid
14.0ms	30×	1	valid

Compiler

Compiled 2 774 to 1 509 computations (45.6% saved)

Precisions

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

ival-cos: 10.0ms (30.2% of total)

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

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

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

adjust: 2.0ms (6% of total)

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

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

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

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

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

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

bsearch52.0ms (0.5%)

Memory

9.2MiB live, 54.3MiB allocated; 8ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
49.0ms	-1.2026903450396972e+41	-1.2210136946552868e+39

Samples

39.0ms	66×	1	valid
5.0ms	46×	0	valid

Compiler

Compiled 894 to 457 computations (48.9% saved)

Precisions

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

ival-hypot: 21.0ms (53% of total)

ival-mult: 5.0ms (12.6% of total)

adjust: 3.0ms (7.6% of total)

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

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

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

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

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

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

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

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

bsearch76.0ms (0.7%)

Memory

14.9MiB live, 105.7MiB allocated; 6ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
28.0ms	1.2236882030171012e-5	178386.65867166626
43.0ms	-2.566682761213589e-27	-2.796065875159022e-30

Samples

35.0ms	66×	1	valid
21.0ms	174×	0	valid

Compiler

Compiled 2 448 to 1 263 computations (48.4% saved)

Precisions

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

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

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

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

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

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

adjust: 3.0ms (6.2% of total)

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

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

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

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

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

bsearch7.0ms (0.1%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	1.2236882030171012e-5	178386.65867166626
5.0ms	-2.566682761213589e-27	-2.796065875159022e-30

Samples

2.0ms	5×	1	valid
1.0ms	11×	0	valid

Compiler

Compiled 2 416 to 1 247 computations (48.4% saved)

Precisions

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

ival-mult: 1.0ms (42.3% of total)

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

adjust: 0.0ms (0% of total)

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

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

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

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

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

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

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

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

bsearch95.0ms (0.9%)

Memory

-14.0MiB live, 93.9MiB allocated; 14ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
31.0ms	3.4636364467769036e-21	9.671671006043357e-17
57.0ms	-3.846666678791991e-303	2.2565814427919617e-308

Samples

55.0ms	90×	1	valid
21.0ms	182×	0	valid

Compiler

Compiled 2 276 to 1 069 computations (53% saved)

Precisions

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

ival-hypot: 26.0ms (38.7% of total)

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

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

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

adjust: 5.0ms (7.5% of total)

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

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

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

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

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

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

bsearch123.0ms (1.2%)

Memory

-23.8MiB live, 116.4MiB allocated; 20ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
36.0ms	3.8927879058928225e-27	1.3159441575511016e-25
81.0ms	-2.4193238940526392e-294	-3.433162949593942e-301

Samples

71.0ms	169×	0	valid
29.0ms	87×	1	valid

Compiler

Compiled 1 937 to 960 computations (50.4% saved)

Precisions

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

ival-hypot: 54.0ms (59.3% of total)

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

ival-log: 10.0ms (11% of total)

adjust: 5.0ms (5.5% of total)

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

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

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

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

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

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

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

bsearch77.0ms (0.7%)

Memory

6.1MiB live, 95.2MiB allocated; 9ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
33.0ms	1.2236882030171012e-5	178386.65867166626
39.0ms	-2.1230679687590874e-11	-1.0619032670598871e-21

Samples

39.0ms	163×	0	valid
23.0ms	61×	1	valid

Compiler

Compiled 2 360 to 1 163 computations (50.7% saved)

Precisions

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

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

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

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

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

adjust: 3.0ms (8.7% of total)

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

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

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

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

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

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

bsearch42.0ms (0.4%)

Memory

16.7MiB live, 61.7MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
37.0ms	1.2236882030171012e-5	178386.65867166626
1.0ms	-2.1230679687590874e-11	-1.0619032670598871e-21

Samples

16.0ms	35×	1	valid
15.0ms	109×	0	valid

Compiler

Compiled 2 360 to 1 163 computations (50.7% saved)

Precisions

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

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

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

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

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

adjust: 2.0ms (7.7% of total)

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

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

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

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

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

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

simplify65.0ms (0.6%)

Memory

4.5MiB live, 57.5MiB allocated; 12ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	191	2201
1	292	2169
2	460	2169
3	830	2169
4	1950	2169

Stop Event

1×	node limit

Calls

Call 1

Inputs
(if (<=.f64 y.re #s(literal -5582757582296647/5316911983139663491615228241121378304 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 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (if (<=.f64 y.re #s(literal 48999163945791/72057594037927936 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (.f64 (neg.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 (hypot.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 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))))
(if (<=.f64 y.re #s(literal -5582757582296647/5316911983139663491615228241121378304 binary64)) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)))) (if (<=.f64 y.re #s(literal 48999163945791/72057594037927936 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (.f64 (neg.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 (hypot.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 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))))
(if (<=.f64 y.re #s(literal -944473296573929/37778931862957161709568 binary64)) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 7177997053961861/75557863725914323419136 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (.f64 (neg.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 (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 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -5582757582296647/5316911983139663491615228241121378304 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (hypot.f64 x.im x.re) y.re) (sin.f64 (fma.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re (/.f64 (PI.f64) #s(literal 2 binary64)))))) (if (<=.f64 y.re #s(literal 7177997053961861/75557863725914323419136 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (.f64 (neg.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 (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 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -5582757582296647/5316911983139663491615228241121378304 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (hypot.f64 x.im x.re) y.re) (sin.f64 (fma.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re (/.f64 (PI.f64) #s(literal 2 binary64)))))) (if (<=.f64 y.re #s(literal 3929008913747545/302231454903657293676544 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 #s(approx (cos (neg ( y.im (log (/ -1 x.re))))) #s(literal 1 binary64)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -65000000000000 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.im x.im) x.re) #s(literal 1/2 binary64) x.re)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 y.re #s(literal 3929008913747545/302231454903657293676544 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 #s(approx (cos (neg ( y.im (log (/ -1 x.re))))) #s(literal 1 binary64)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.im #s(literal -32999999999999998463749672618390833856512 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) x.re) (/.f64 (.f64 x.im x.im) x.re) #s(literal 1 binary64)) x.re)) y.re) #s(approx (cos (* (atan2 x.im 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 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))))
(if (<=.f64 y.re #s(literal -6690223559559187/2787593149816327892691964784081045188247552 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) x.re) (/.f64 (.f64 x.im x.im) x.re) #s(literal 1 binary64)) x.re)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 y.re #s(literal 4722366482869645/295147905179352825856 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (neg.f64 y.im) (atan2.f64 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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.im x.im) x.re) #s(literal 1/2 binary64) x.re)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -1777090633007909/696898287454081973172991196020261297061888 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.im x.im) x.re) #s(literal 1/2 binary64) x.re)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 y.re #s(literal 4722366482869645/295147905179352825856 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (neg.f64 y.im) (atan2.f64 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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.im x.im) x.re) #s(literal 1/2 binary64) x.re)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 x.re #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.re)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 x.re #s(literal 7788445287802241/5192296858534827628530496329220096 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)) (/.f64 y.re #s(literal 2 binary64))) #s(approx (cos (* (atan2 x.im 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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 x.im #s(literal -1748795881594061/92041888504950574475740425768398066361240421321846096523996201552759130012416493123946740389072658442813498306494153399121300361632981310716337884487410751681417161433531128461466736435838000189159978471467522953645133149359340995314643512596903545427635461470508184698852989920501614748075702440767602758254592 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.im)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 x.im #s(literal 3832940580997451/696898287454081973172991196020261297061888 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re) #s(approx (cos (* (atan2 x.im 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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -3249592603124123/154742504910672534362390528 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 y.re #s(literal 5902958103587057/295147905179352825856 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -3249592603124123/154742504910672534362390528 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 y.re #s(literal 6980579422424269/4503599627370496 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(literal 1 binary64)))

Outputs
(if (<=.f64 y.re #s(literal -5582757582296647/5316911983139663491615228241121378304 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 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (if (<=.f64 y.re #s(literal 48999163945791/72057594037927936 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (.f64 (neg.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 (hypot.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 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))))
(if (<=.f64 y.re #s(literal -5582757582296647/5316911983139663491615228241121378304 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 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (if (<=.f64 y.re #s(literal 48999163945791/72057594037927936 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (.f64 (neg.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 (hypot.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 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))))
(if (<=.f64 y.re #s(literal -5582757582296647/5316911983139663491615228241121378304 binary64)) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)))) (if (<=.f64 y.re #s(literal 48999163945791/72057594037927936 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (.f64 (neg.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 (hypot.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 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))))
(if (or (<=.f64 y.re #s(literal -5582757582296647/5316911983139663491615228241121378304 binary64)) (not (<=.f64 y.re #s(literal 48999163945791/72057594037927936 binary64)))) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) y.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 (exp.f64 (.f64 (neg.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 (hypot.f64 x.im x.re))))))))
(if (<=.f64 y.re #s(literal -944473296573929/37778931862957161709568 binary64)) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 7177997053961861/75557863725914323419136 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (.f64 (neg.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 (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 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -944473296573929/37778931862957161709568 binary64)) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 7177997053961861/75557863725914323419136 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (.f64 (neg.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 (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 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -5582757582296647/5316911983139663491615228241121378304 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (hypot.f64 x.im x.re) y.re) (sin.f64 (fma.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re (/.f64 (PI.f64) #s(literal 2 binary64)))))) (if (<=.f64 y.re #s(literal 7177997053961861/75557863725914323419136 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (.f64 (neg.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 (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 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -5582757582296647/5316911983139663491615228241121378304 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (hypot.f64 x.im x.re) y.re) (sin.f64 (fma.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re (/.f64 (PI.f64) #s(literal 2 binary64)))))) (if (<=.f64 y.re #s(literal 7177997053961861/75557863725914323419136 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (.f64 (neg.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 (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 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -5582757582296647/5316911983139663491615228241121378304 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (hypot.f64 x.im x.re) y.re) (sin.f64 (fma.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re (/.f64 (PI.f64) #s(literal 2 binary64)))))) (if (<=.f64 y.re #s(literal 3929008913747545/302231454903657293676544 binary64)) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 #s(approx (cos (neg ( y.im (log (/ -1 x.re))))) #s(literal 1 binary64)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -65000000000000 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.im x.im) x.re) #s(literal 1/2 binary64) x.re)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 y.re #s(literal 3929008913747545/302231454903657293676544 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (.f64 #s(approx (cos (neg ( y.im (log (/ -1 x.re))))) #s(literal 1 binary64)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) #s(approx ( (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.im #s(literal -32999999999999998463749672618390833856512 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) x.re) (/.f64 (.f64 x.im x.im) x.re) #s(literal 1 binary64)) x.re)) y.re) #s(approx (cos (* (atan2 x.im 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 (pow.f64 (hypot.f64 x.im x.re) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))))
(if (<=.f64 y.re #s(literal -6690223559559187/2787593149816327892691964784081045188247552 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) x.re) (/.f64 (.f64 x.im x.im) x.re) #s(literal 1 binary64)) x.re)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 y.re #s(literal 4722366482869645/295147905179352825856 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (neg.f64 y.im) (atan2.f64 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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.im x.im) x.re) #s(literal 1/2 binary64) x.re)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -1777090633007909/696898287454081973172991196020261297061888 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.im x.im) x.re) #s(literal 1/2 binary64) x.re)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 y.re #s(literal 4722366482869645/295147905179352825856 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (neg.f64 y.im) (atan2.f64 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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.im x.im) x.re) #s(literal 1/2 binary64) x.re)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (or (<=.f64 y.re #s(literal -1777090633007909/696898287454081973172991196020261297061888 binary64)) (not (<=.f64 y.re #s(literal 4722366482869645/295147905179352825856 binary64)))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (fma.f64 (/.f64 (.f64 x.im x.im) x.re) #s(literal 1/2 binary64) x.re)) y.re) #s(approx (cos ( (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (exp (neg y.im)) (atan2 x.im x.re)) (cos (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.im))) (fma.f64 (neg.f64 y.im) (atan2.f64 x.im x.re) #s(literal 1 binary64)))))
(if (<=.f64 x.re #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.re)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 x.re #s(literal 7788445287802241/5192296858534827628530496329220096 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)) (/.f64 y.re #s(literal 2 binary64))) #s(approx (cos (* (atan2 x.im 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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 x.im #s(literal -1748795881594061/92041888504950574475740425768398066361240421321846096523996201552759130012416493123946740389072658442813498306494153399121300361632981310716337884487410751681417161433531128461466736435838000189159978471467522953645133149359340995314643512596903545427635461470508184698852989920501614748075702440767602758254592 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.im)) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 x.im #s(literal 3832940580997451/696898287454081973172991196020261297061888 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re) #s(approx (cos (* (atan2 x.im 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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -3249592603124123/154742504910672534362390528 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 y.re #s(literal 5902958103587057/295147905179352825856 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (<=.f64 y.re #s(literal -3249592603124123/154742504910672534362390528 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) (if (<=.f64 y.re #s(literal 6980579422424269/4503599627370496 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im 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 (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64))))))
(if (or (<=.f64 y.re #s(literal -3249592603124123/154742504910672534362390528 binary64)) (not (<=.f64 y.re #s(literal 6980579422424269/4503599627370496 binary64)))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re) #s(approx (cos (* (atan2 x.im x.re) y.re)) #s(literal 1 binary64)))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (cos (* (atan2 x.im x.re) y.re))) #s(literal 1 binary64)))

derivations481.0ms (4.5%)

Memory

-38.5MiB live, 409.6MiB allocated; 82ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 2 203 to 189 computations (91.4% saved)

preprocess85.0ms (0.8%)

Memory: -13.2MiB live, 177.7MiB allocated; 16ms collecting garbage
Compiler: Compiled 4 480 to 416 computations (90.7% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze591.0ms (5.6%)

sample2.7s (25.1%)

explain453.0ms (4.3%)

preprocess239.0ms (2.3%)

eval0.0ms (0%)

prune1.0ms (0%)

series211.0ms (2%)

simplify292.0ms (2.8%)

rewrite67.0ms (0.6%)

eval121.0ms (1.1%)

prune35.0ms (0.3%)

series791.0ms (7.5%)

simplify377.0ms (3.6%)

rewrite165.0ms (1.6%)

eval674.0ms (6.4%)

prune162.0ms (1.5%)

series274.0ms (2.6%)

simplify277.0ms (2.6%)

rewrite170.0ms (1.6%)

eval101.0ms (1%)

prune113.0ms (1.1%)

series269.0ms (2.5%)

simplify259.0ms (2.4%)

rewrite121.0ms (1.1%)

eval89.0ms (0.8%)

prune194.0ms (1.8%)

regimes161.0ms (1.5%)

regimes32.0ms (0.3%)

regimes28.0ms (0.3%)

regimes41.0ms (0.4%)

regimes87.0ms (0.8%)

regimes18.0ms (0.2%)

regimes25.0ms (0.2%)

regimes23.0ms (0.2%)

regimes5.0ms (0%)

regimes29.0ms (0.3%)

regimes6.0ms (0.1%)

regimes5.0ms (0.1%)

regimes2.0ms (0%)

regimes40.0ms (0.4%)

bsearch82.0ms (0.8%)

bsearch7.0ms (0.1%)

bsearch98.0ms (0.9%)

bsearch8.0ms (0.1%)

bsearch37.0ms (0.3%)

bsearch53.0ms (0.5%)

bsearch52.0ms (0.5%)

bsearch76.0ms (0.7%)

bsearch7.0ms (0.1%)

bsearch95.0ms (0.9%)

bsearch123.0ms (1.2%)

bsearch77.0ms (0.7%)

bsearch42.0ms (0.4%)

simplify65.0ms (0.6%)

derivations481.0ms (4.5%)

preprocess85.0ms (0.8%)

end0.0ms (0%)

Profiling