Metrics for powComplex, real part

start0.0ms (0%)

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

analyze594.0ms (5.3%)

Memory

-0.8MiB live, 414.2MiB allocated; 626ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 39 to 18 computations (53.8% saved)

sample2.6s (23.8%)

Memory

11.9MiB live, 2 498.9MiB allocated; 598ms collecting garbage

Samples

1.4s	3 018×	1	valid
708.0ms	5 238×	0	valid

Precisions

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

ival-mult: 413.0ms (23.6% of total)

ival-hypot: 332.0ms (19% of total)

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

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

adjust: 190.0ms (10.9% of total)

ival-add: 122.0ms (7% of total)

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

ival-exp: 77.0ms (4.4% of total)

ival-sub: 47.0ms (2.7% of total)

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

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

Bogosity

explain520.0ms (4.7%)

Memory

23.0MiB live, 597.6MiB allocated; 45ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
195	-	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)))`
121	-	1	(-1.1453917933191992e-172 -1.7543198763176259e-161 -43.8382599791366 7.235962586960694e-156)	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`
6	-	1	(9.244104931125215e+58 9.236037795118237e-252 -1.1009013175939088e+88 2.423665492449192e+89)	`(*.f64 (atan2.f64 x.im x.re) y.im)`
4	-	1	(9.244104931125215e+58 9.236037795118237e-252 -1.1009013175939088e+88 2.423665492449192e+89)	`(*.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	194	0
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`	oflow-rescue	102	0
↳	`(*.f64 x.re x.re)`	overflow	68
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	overflow	102
↳	`(*.f64 x.im x.im)`	overflow	48
`cos.f64`	`(cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))`	oflow-rescue	1	0
↳	`(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))`	overflow	1
↳	`(*.f64 x.re x.re)`	overflow	68
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	overflow	102
↳	`(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)`	overflow	1
↳	`(*.f64 x.im x.im)`	overflow	48
`*.f64`	`(*.f64 (atan2.f64 x.im x.re) y.re)`	*nu**	1	0
`*.f64`	`(*.f64 (atan2.f64 x.im x.re) y.im)`	*nu**	1	0
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`	uflow-rescue	1	0
↳	`(*.f64 x.re x.re)`	underflow	51
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	underflow	18
↳	`(*.f64 x.im x.im)`	underflow	71

Confusion

	Predicted +	Predicted -
+	149	2
-	75	30

Precision

0.6651785714285714

Recall

0.9867549668874173

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	149	0	2
-	75	0	30

Precision?

0.6651785714285714

Recall?

0.9867549668874173

Freqs

test

number	freq
0	32
1	149
2	74
3	1

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

170.0ms	390×	1	valid
19.0ms	122×	0	valid

Compiler

Compiled 393 to 61 computations (84.5% saved)

Precisions

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

ival-mult: 35.0ms (25.3% of total)

adjust: 24.0ms (17.3% of total)

ival-hypot: 18.0ms (13% of total)

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

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

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

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

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

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

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

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

preprocess266.0ms (2.4%)

Memory

21.0MiB live, 208.3MiB allocated; 50ms 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)

prune0.0ms (0%)

Memory

0.9MiB live, 0.9MiB 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)

simplify170.0ms (1.5%)

Memory

8.2MiB live, 140.7MiB allocated; 15ms collecting garbage

Localize:

Found 4 expressions of interest:

New	Metric	Score
cost-diff	1	(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
cost-diff	1	(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
cost-diff	1	(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
cost-diff	4	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	19	176
0	34	176
1	69	174
2	179	174
3	397	174
4	945	174
5	5099	174
0	8111	120

Stop Event

1×	iter limit
1×	node limit
1×	iter 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))))
(exp.f64 (-.f64 (.f64 (log.f64 (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 (exp.f64 (-.f64 (.f64 (log.f64 (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))
(exp.f64 (-.f64 (.f64 (log.f64 (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 (pow.f64 (hypot.f64 x.im x.re) y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(fma.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im (*.f64 y.re (log.f64 (hypot.f64 x.im x.re))))
(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(*.f64 y.re (log.f64 (hypot.f64 x.im x.re)))
(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))
(log.f64 (hypot.f64 x.im x.re))
(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
(hypot.f64 x.im x.re)
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(*.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)
(*.f64 y.im (atan2.f64 x.im x.re))
(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)))
(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 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.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))
(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(*.f64 y.im (log.f64 (hypot.f64 x.im x.re)))
(*.f64 (atan2.f64 x.im x.re) y.re)

localize147.0ms (1.3%)

Memory

-36.4MiB live, 162.1MiB allocated; 14ms collecting garbage

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.9656968070567642	(*.f64 (atan2.f64 x.im x.re) y.re)
accuracy	1.4361161223659518	(*.f64 (atan2.f64 x.im x.re) y.im)
accuracy	28.05146078484507	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
accuracy	42.79423108237889	(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)))

Samples

80.0ms	195×	1	valid
27.0ms	61×	0	valid

Compiler

Compiled 178 to 21 computations (88.2% saved)

Precisions

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

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

adjust: 12.0ms (14.2% of total)

ival-hypot: 12.0ms (14.2% of total)

ival-log: 9.0ms (10.7% of total)

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

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

ival-add: 4.0ms (4.7% of total)

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

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

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

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

series64.0ms (0.6%)

Memory

-4.8MiB live, 90.9MiB allocated; 17ms collecting garbage

Counts

7 → 126

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
12.0ms	x.im	@	inf	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (atan2 x.im x.re) y.im) (* (atan2 x.im x.re) y.re))
10.0ms	y.re	@	0	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (atan2 x.im x.re) y.im) (* (atan2 x.im x.re) y.re))
6.0ms	x.re	@	inf	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (atan2 x.im x.re) y.im) (* (atan2 x.im x.re) y.re))
5.0ms	x.re	@	0	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (atan2 x.im x.re) y.im) (* (atan2 x.im x.re) y.re))
5.0ms	y.im	@	-inf	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (atan2 x.im x.re) y.im) (* (atan2 x.im x.re) y.re))

simplify220.0ms (2%)

Memory

13.2MiB live, 238.2MiB allocated; 34ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	836	7273
1	2567	7115
0	9651	5916

Stop Event

1×	iter limit
1×	node limit

Counts

126 → 126

Calls

Call 1

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

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

rewrite125.0ms (1.1%)

Memory

-8.7MiB live, 97.1MiB allocated; 33ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	18	78
0	32	78
1	114	77
0	892	54

Stop Event

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

Counts

7 → 194

Calls

Call 1

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

Outputs
(.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.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.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 (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 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 (-.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 (-.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 y.im (atan2.f64 x.im x.re))
(*.f64 (atan2.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))

eval69.0ms (0.6%)

Memory: 25.3MiB live, 114.8MiB allocated; 12ms collecting garbage
Compiler: Compiled 23 923 to 2 775 computations (88.4% saved)

prune21.0ms (0.2%)

Memory

7.2MiB live, 53.5MiB allocated; 2ms collecting garbage

Pruning

15 alts after pruning (15 fresh and 0 done)

	Pruned	Kept	Total
New	476	15	491
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	477	15	492

Accuracy

77.3%

Counts

492 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
	61.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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))))))
	61.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))) (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)))))
▶	22.8%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #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))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	21.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 #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))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	28.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	30.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 #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)))))
▶	31.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #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)))))
	61.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (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))))
▶	63.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 #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))))
	19.2%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #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))) 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))))
	19.7%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #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))) 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))))
▶	16.8%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.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))))
	21.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im 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))))
▶	29.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (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))))
	29.0%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (exp.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))))

Compiler

Compiled 1 302 to 830 computations (36.3% saved)

simplify153.0ms (1.4%)

Memory

-19.0MiB live, 166.1MiB allocated; 22ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	1	(+.f64 (.f64 (log.f64 #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))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
cost-diff	1	(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
cost-diff	1	(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
cost-diff	4	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
cost-diff	1	(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
cost-diff	1	(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
cost-diff	1	(exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
cost-diff	4	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
cost-diff	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 #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)))))
cost-diff	1	(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
cost-diff	1	(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
cost-diff	4	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
cost-diff	0	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
cost-diff	1	(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
cost-diff	1	(+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
cost-diff	4	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
cost-diff	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 #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))))
cost-diff	1	(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
cost-diff	1	(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
cost-diff	4	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	61	1037
0	105	787
1	179	777
2	400	777
3	906	777
4	2365	777
0	9255	757

Stop Event

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

localize189.0ms (1.7%)

Memory

24.7MiB live, 268.8MiB allocated; 16ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	2.767846293105954	(/.f64 (*.f64 x.re x.re) x.im)
accuracy	12.309618595408464	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
accuracy	16.069531657424843	#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))
accuracy	21.721792525666825	(cos.f64 (+.f64 (.f64 (log.f64 #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))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))
accuracy	0.6352419160186845	(*.f64 (atan2.f64 x.im x.re) y.re)
accuracy	12.309618595408464	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
accuracy	21.721792525666825	(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)))
accuracy	31.497710859274125	#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))
accuracy	0.6352419160186845	(*.f64 (atan2.f64 x.im x.re) y.re)
accuracy	10.487750310187174	#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)))
accuracy	12.309618595408464	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
accuracy	21.721792525666825	(cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (log.f64 x.im) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
accuracy	0.6352419160186845	(*.f64 (atan2.f64 x.im x.re) y.re)
accuracy	10.270639940044067	#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))
accuracy	12.309618595408464	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
accuracy	21.721792525666825	(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)))
accuracy	0.6126430370571199	(*.f64 (atan2.f64 x.im x.re) y.im)
accuracy	12.309618595408464	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
accuracy	13.16659789868057	#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))
accuracy	21.721792525666825	(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)))

Samples

92.0ms	99×	1	valid
39.0ms	128×	0	invalid
9.0ms	29×	0	valid

Compiler

Compiled 931 to 33 computations (96.5% saved)

Precisions

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

ival-mult: 41.0ms (41.5% of total)

ival-hypot: 13.0ms (13.2% of total)

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

adjust: 9.0ms (9.1% of total)

ival-add: 6.0ms (6.1% of total)

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

ival-pow: 4.0ms (4.1% of total)

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

ival-div: 2.0ms (2% of total)

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

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

ival-neg: 1.0ms (1% of total)

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

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

exact: 0.0ms (0% of total)

series81.0ms (0.7%)

Memory

15.4MiB live, 152.9MiB allocated; 27ms collecting garbage

Counts

21 → 160

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
12.0ms	x.re	@	inf	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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.im) (* (atan2 x.im x.re) y.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im 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))) (* (atan2 x.im x.re) y.re) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (sqrt (+ (* x.re x.re) (* x.im x.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ (* x.re x.re) x.im))
10.0ms	x.im	@	inf	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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.im) (* (atan2 x.im x.re) y.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im 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))) (* (atan2 x.im x.re) y.re) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (sqrt (+ (* x.re x.re) (* x.im x.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ (* x.re x.re) x.im))
8.0ms	y.re	@	-inf	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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.im) (* (atan2 x.im x.re) y.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im 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))) (* (atan2 x.im x.re) y.re) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (sqrt (+ (* x.re x.re) (* x.im x.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ (* x.re x.re) x.im))
8.0ms	x.re	@	-inf	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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.im) (* (atan2 x.im x.re) y.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im 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))) (* (atan2 x.im x.re) y.re) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (sqrt (+ (* x.re x.re) (* x.im x.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ (* x.re x.re) x.im))
6.0ms	x.im	@	-inf	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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.im) (* (atan2 x.im x.re) y.re)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im 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))) (* (atan2 x.im x.re) y.re) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (sqrt (+ (* x.re x.re) (* x.im x.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (/ (* x.re x.re) x.im))

simplify240.0ms (2.2%)

Memory

-15.7MiB live, 230.0MiB allocated; 40ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1271	15100
1	4055	14845
0	8379	12584

Stop Event

1×	iter limit
1×	node limit

Counts

160 → 160

Calls

Call 1

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

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

rewrite235.0ms (2.1%)

Memory

-14.9MiB live, 217.6MiB allocated; 27ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	59	447
0	101	342
1	286	341
2	1935	339
0	9663	328

Stop Event

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

Counts

21 → 442

Calls

Call 1

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

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

eval237.0ms (2.1%)

Memory: 26.7MiB live, 364.9MiB allocated; 110ms collecting garbage
Compiler: Compiled 102 061 to 5 333 computations (94.8% saved)

prune107.0ms (1%)

Memory

-33.9MiB live, 207.5MiB allocated; 14ms collecting garbage

Pruning

29 alts after pruning (29 fresh and 0 done)

	Pruned	Kept	Total
New	1 635	28	1 663
Fresh	9	1	10
Picked	5	0	5
Done	0	0	0
Total	1 649	29	1 678

Accuracy

95.7%

Counts

1 678 → 29

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	29.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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))))))
	32.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (neg.f64 #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)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
▶	61.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (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))))
	33.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 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.re x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	23.3%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 (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))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	33.2%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	17.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (log.f64 x.re) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))))
	30.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 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 (fma.f64 y.im (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (atan2.f64 x.im x.re)) y.re))))
	33.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 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))))
	34.8%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im 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))))
	56.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (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))))))
	57.1%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (neg.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.re x.im)) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	13.1%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 (.f64 (sqrt.f64 (+.f64 x.im x.re)) (sqrt.f64 (-.f64 x.im x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	11.9%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (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.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	17.9%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (fma.f64 (/.f64 (.f64 x.re x.re) x.im) #s(literal 1/2 binary64) x.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
▶	23.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 #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))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	18.1%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 #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))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	27.6%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	28.5%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	30.1%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #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)))))
	26.7%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #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)))))
▶	57.8%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (fma.f64 y.im (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (atan2.f64 x.im x.re)) y.re))))
▶	56.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
	59.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (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))))
	28.5%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (log.f64 x.im) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))))
	50.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))
	46.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (+.f64 (neg.f64 (fma.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 (.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 (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)) y.im (.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
	45.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (+.f64 (neg.f64 (fma.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 (.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 (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)) y.im (.f64 (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
	35.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 (neg.f64 y.im) (neg.f64 (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (neg.f64 (fma.f64 (neg.f64 (log.f64 x.re)) y.re (*.f64 (atan2.f64 x.im x.re) y.im))))))

Compiler

Compiled 3 490 to 1 758 computations (49.6% saved)

simplify207.0ms (1.9%)

Memory

33.4MiB live, 207.4MiB allocated; 53ms collecting garbage

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	60	986
0	102	801
1	172	783
2	358	783
3	775	783
4	1856	783
0	8208	765

Stop Event

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

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

localize211.0ms (1.9%)

Memory

18.2MiB live, 259.2MiB allocated; 25ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	10.487750310187174	#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)))
accuracy	12.309618595408464	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
accuracy	21.923303436246865	(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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)))))
accuracy	30.99924529256386	(PI.f64)
accuracy	0.1171875	(/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re)
accuracy	5.010271603410778	(*.f64 (fma.f64 y.im (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (atan2.f64 x.im x.re)) y.re)
accuracy	10.270639940044067	#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))
accuracy	21.721792525666825	(cos.f64 #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)))
accuracy	3.0132116423161013	(/.f64 (*.f64 x.im x.im) x.re)
accuracy	10.270639940044067	#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))
accuracy	21.721792525666825	(cos.f64 (+.f64 (.f64 (log.f64 #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))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))
accuracy	23.2820409097674	#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))
accuracy	0.6352419160186845	(*.f64 (atan2.f64 x.im x.re) y.re)
accuracy	10.270639940044067	#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))
accuracy	18.14584454973868	#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))
accuracy	21.721792525666825	(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)))
accuracy	0.6352419160186845	(*.f64 (atan2.f64 x.im x.re) y.re)
accuracy	12.309618595408464	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
accuracy	18.14584454973868	#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))
accuracy	21.721792525666825	(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)))

Samples

108.0ms	99×	1	valid
46.0ms	128×	0	invalid
12.0ms	29×	0	valid

Compiler

Compiled 834 to 41 computations (95.1% saved)

Precisions

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

ival-hypot: 37.0ms (28.6% of total)

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

adjust: 12.0ms (9.3% of total)

ival-log: 12.0ms (9.3% of total)

ival-add: 9.0ms (7% of total)

ival-sin: 8.0ms (6.2% of total)

ival-div: 6.0ms (4.6% of total)

ival-atan2: 6.0ms (4.6% of total)

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

ival-pow: 4.0ms (3.1% of total)

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

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

ival-pi: 1.0ms (0.8% of total)

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

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

exact: 0.0ms (0% of total)

series171.0ms (1.5%)

Memory

-25.8MiB live, 173.8MiB allocated; 40ms collecting garbage

Counts

23 → 299

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
39.0ms	x.im	@	-inf	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (/ (PI) 2) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (sqrt (+ (* x.re x.re) (* x.im x.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/ (* x.im x.im) x.re) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (+ (* y.im (/ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re)) (atan2 x.im x.re)) y.re) (/ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (PI) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))
31.0ms	y.re	@	0	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (/ (PI) 2) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (sqrt (+ (* x.re x.re) (* x.im x.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/ (* x.im x.im) x.re) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (+ (* y.im (/ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re)) (atan2 x.im x.re)) y.re) (/ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (PI) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))
22.0ms	y.re	@	inf	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (/ (PI) 2) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (sqrt (+ (* x.re x.re) (* x.im x.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/ (* x.im x.im) x.re) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (+ (* y.im (/ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re)) (atan2 x.im x.re)) y.re) (/ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (PI) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))
11.0ms	y.re	@	-inf	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (/ (PI) 2) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (sqrt (+ (* x.re x.re) (* x.im x.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/ (* x.im x.im) x.re) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (+ (* y.im (/ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re)) (atan2 x.im x.re)) y.re) (/ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (PI) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))
8.0ms	x.re	@	0	((sqrt (+ (* x.re x.re) (* x.im x.im))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+ (* x.re x.re) (* x.im x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (/ (PI) 2) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (sqrt (+ (* x.re x.re) (* x.im x.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/ (* x.im x.im) x.re) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (+ (* y.im (/ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re)) (atan2 x.im x.re)) y.re) (/ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (PI) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))

simplify253.0ms (2.3%)

Memory

5.6MiB live, 284.4MiB allocated; 46ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1879	22707
1	5912	22379
0	8069	18997

Stop Event

1×	iter limit
1×	node limit

Counts

299 → 299

Calls

Call 1

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

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

rewrite105.0ms (0.9%)

Memory

28.6MiB live, 118.6MiB allocated; 9ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	59	504
0	100	403
1	317	399
0	2162	387

Stop Event

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

Counts

23 → 405

Calls

Call 1

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

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

eval141.0ms (1.3%)

Memory: 12.2MiB live, 191.8MiB allocated; 32ms collecting garbage
Compiler: Compiled 70 186 to 4 144 computations (94.1% saved)

prune111.0ms (1%)

Memory

-40.8MiB live, 108.6MiB allocated; 38ms collecting garbage

Pruning

37 alts after pruning (37 fresh and 0 done)

	Pruned	Kept	Total
New	916	23	939
Fresh	10	14	24
Picked	5	0	5
Done	0	0	0
Total	931	37	968

Accuracy

96.1%

Counts

968 → 37

Alt Table

Click to see full alt table

Status	Accuracy	Program
	32.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (neg.f64 #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)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	61.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))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
▶	61.8%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) y.re)))))
	33.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 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.re x.im)) (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	33.2%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	17.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (log.f64 x.re) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))))
	30.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 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 (fma.f64 y.im (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (atan2.f64 x.im x.re)) y.re))))
▶	34.1%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)) 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))))
	48.9%	(.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 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
	20.8%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re) x.re))) y.im (fma.f64 (atan2.f64 x.im x.re) y.re (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶	56.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (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))))))
	55.9%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 y.im y.re) (atan2.f64 x.im x.re)) y.re)))))
	56.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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)))))
	23.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (neg.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re) x.re))) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	56.5%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 y.im y.re) (atan2.f64 x.im x.re)) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	57.1%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	17.9%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (fma.f64 (/.f64 (.f64 x.re x.re) x.im) #s(literal 1/2 binary64) x.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	18.1%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 #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))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	28.5%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	30.1%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #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)))))
	26.7%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #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)))))
	29.5%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #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 #s(approx (/ (log (sqrt (+ ( x.im x.im) (* x.re x.re)))) y.re) (neg.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))) (atan2.f64 x.im x.re)) y.re))))
	59.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (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))))
	28.5%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (log.f64 x.im) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))))
	49.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
	50.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (exp.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))
	25.4%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 (/.f64 (.f64 (pow.f64 x.re y.re) y.re) x.re) (/.f64 (.f64 x.im x.im) x.re)) #s(literal 1/2 binary64) (pow.f64 x.re y.re)))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
	21.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (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)))) (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))))
	22.7%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re #s(literal 1 binary64)))) (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))))
	22.0%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))) (cos.f64 (+.f64 (.f64 (log.f64 #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))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	39.9%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
▶	12.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 (+.f64 (.f64 (log.f64 #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))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	36.6%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (fma.f64 y.im (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (atan2.f64 x.im x.re)) y.re))))
	35.4%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
	10.6%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (cos.f64 (+.f64 (.f64 (log.f64 #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))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	22.6%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (cos.f64 #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))))
▶	22.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (cos.f64 #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))))

Compiler

Compiled 4 084 to 2 202 computations (46.1% saved)

simplify221.0ms (2%)

Memory

33.3MiB live, 209.8MiB allocated; 34ms collecting garbage

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	72	713
0	121	709
1	197	699
2	400	699
3	869	699
4	2178	699
0	9538	685

Stop Event

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

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

localize318.0ms (2.9%)

Memory

10.7MiB live, 431.7MiB allocated; 65ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.11328125	(fma.f64 (atan2.f64 x.im x.re) y.re (/.f64 (PI.f64) #s(literal 2 binary64)))
accuracy	12.731549916099672	#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))
accuracy	15.015259438585579	(PI.f64)
accuracy	36.02526570164537	(sin.f64 (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)))))
accuracy	1.1633217133627285	(*.f64 (atan2.f64 x.im x.re) y.im)
accuracy	24.862515574905746	#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))
accuracy	34.0212279832306	#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
accuracy	35.9240302664098	(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)))
accuracy	6.9716391954953645	#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))
accuracy	12.731549916099672	#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re)))
accuracy	33.906984157920455	#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))
accuracy	35.9240302664098	(cos.f64 (+.f64 (.f64 (log.f64 #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))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))
accuracy	12.731549916099672	#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))
accuracy	24.862515574905746	#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))
accuracy	31.216536937174205	#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
accuracy	35.9240302664098	(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)))
accuracy	15.015259438585579	(PI.f64)
accuracy	21.152859213228837	(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
accuracy	22.983779284283187	(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) y.re)))
accuracy	25.275620197424733	#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) y.re))))

Samples

222.0ms	163×	1	valid
28.0ms	62×	0	invalid
19.0ms	31×	0	valid

Compiler

Compiled 754 to 45 computations (94% saved)

Precisions

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

ival-mult: 61.0ms (28.5% of total)

ival-sin: 40.0ms (18.7% of total)

adjust: 23.0ms (10.8% of total)

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

ival-pow: 17.0ms (8% of total)

ival-log: 13.0ms (6.1% of total)

ival-add: 10.0ms (4.7% of total)

ival-sub: 9.0ms (4.2% of total)

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

ival-div: 5.0ms (2.3% of total)

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

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

ival-pi: 1.0ms (0.5% of total)

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

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

exact: 0.0ms (0% of total)

series287.0ms (2.6%)

Memory

-24.4MiB live, 322.4MiB allocated; 44ms collecting garbage

Counts

29 → 408

Calls

Call 1

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

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

Calls

12 calls:

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

simplify329.0ms (3%)

Memory

31.0MiB live, 363.9MiB allocated; 29ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2399	41592
1	7698	41592
0	8012	35811

Stop Event

1×	iter limit
1×	node limit

Counts

408 → 408

Calls

Call 1

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

Outputs
#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 (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 (log.f64 x.im) y.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 (- (* 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 (.f64 (.f64 (.f64 x.re x.re) y.re) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.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 (- (* 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 y.re (/.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (.f64 (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) (.f64 x.re x.re) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.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 (- (* 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 y.re (/.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.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) (fma.f64 (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 y.re #s(literal 3 binary64))) (pow.f64 x.im #s(literal 6 binary64))))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re) (.f64 (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))) (.f64 x.re x.re))) (.f64 x.re x.re) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 y.re (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal -1/2 binary64))) (.f64 x.re x.re) (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.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))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))) (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)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64)))))) (.f64 x.re x.re) (.f64 (.f64 y.re (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64)))) (.f64 x.re x.re) (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.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))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.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 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64))) (fma.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64)))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.f64 (.f64 y.re (/.f64 (.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)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 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 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (fma.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64))) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.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)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))))) (.f64 x.re x.re) (.f64 (.f64 y.re (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64)))) (.f64 x.re x.re) (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))))
#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) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/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) (fma.f64 (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.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) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (fma.f64 (-.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 6 binary64))) #s(literal 1/8 binary64) (.f64 (neg.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (fma.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64))) (pow.f64 x.im #s(literal 6 binary64)))))) (.f64 x.re x.re) (.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 (.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)))) #s(literal -1/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 x.re x.re) (/.f64 y.im (.f64 x.im 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 (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (.f64 (.f64 (.f64 x.re x.re) y.re) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 y.re (/.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (.f64 (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) (.f64 x.re x.re) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 y.re (/.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.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) (fma.f64 (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 y.re #s(literal 3 binary64))) (pow.f64 x.im #s(literal 6 binary64))))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re) (.f64 (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))) (.f64 x.re x.re))) (.f64 x.re x.re) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 y.re (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal -1/2 binary64))) (.f64 x.re x.re) (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.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))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))) (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)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64)))))) (.f64 x.re x.re) (.f64 (.f64 y.re (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64)))) (.f64 x.re x.re) (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.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))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.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 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64))) (fma.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64)))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.f64 (.f64 y.re (/.f64 (.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)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 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 (sin.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (fma.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64))) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.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)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))))) (.f64 x.re x.re) (.f64 (.f64 y.re (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64)))) (.f64 x.re x.re) (.f64 (cos.f64 (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 y.re (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (log.f64 x.im) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (fma.f64 (/.f64 y.re (.f64 x.im x.im)) #s(literal 1/2 binary64) (/.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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (fma.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 (/.f64 y.re (.f64 x.im x.im)) #s(literal 1/2 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.im x.im) (* x.re x.re)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (*.f64 (log.f64 x.im) y.re))
#s(approx (* (log (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 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 y.re (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (log.f64 x.im) y.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (fma.f64 (/.f64 y.re (.f64 x.im x.im)) #s(literal 1/2 binary64) (/.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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (fma.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 (/.f64 y.re (.f64 x.im x.im)) #s(literal 1/2 binary64))) (.f64 x.re x.re) (.f64 (log.f64 x.im) y.re)))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (fma.f64 (fma.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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/4 binary64) (.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64))) (.f64 x.re x.re) (.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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))) (.f64 x.re x.re) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (fma.f64 (fma.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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/4 binary64) (fma.f64 (fma.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/8 binary64) (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (fma.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64))) (pow.f64 x.im #s(literal 6 binary64)))))) (.f64 x.re x.re) (.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64)))) (.f64 x.re x.re) (.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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))) (.f64 x.re x.re) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 y.im (/.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) (.f64 y.re (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))))) (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 y.im (/.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) (.f64 y.re (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)))) (.f64 (fma.f64 (/.f64 (.f64 (.f64 y.im y.re) (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/4 binary64) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64))) (fma.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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/4 binary64) (.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64)))))) (.f64 x.re x.re))) (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 y.im (/.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) (.f64 y.re (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)))) (.f64 (fma.f64 (/.f64 (.f64 (.f64 y.im y.re) (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/4 binary64) (fma.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64))) (fma.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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/4 binary64) (.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64)))) (.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (.f64 y.re (/.f64 (.f64 (fma.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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/4 binary64) (.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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) (fma.f64 (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 y.re #s(literal 3 binary64))) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/8 binary64) (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (fma.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64))) (pow.f64 x.im #s(literal 6 binary64)))))))))) (.f64 x.re x.re)))) (.f64 x.re x.re))) (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.im) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.im) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (sin (+ (* (PI) 1/2) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (PI) 1/2) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) 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 (* (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) 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 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) y.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 (exp (- (* (log (sqrt (+ (* x.re x.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 (neg.f64 (log.f64 x.re)) y.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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.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 (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))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im)))))
#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 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) #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 (+ (* -1 (* y.im (log (/ 1 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (fma.f64 (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im))))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 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)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))))))) (.f64 x.im x.im)) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))))) (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 (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/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 (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/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 (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 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 (neg.f64 (*.f64 (neg.f64 (log.f64 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))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (*.f64 (neg.f64 (log.f64 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 (+ (* -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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (.f64 x.re x.re)) #s(literal -1/2 binary64) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 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 (+ (* -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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (.f64 x.re x.re)) #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.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (pow.f64 x.re #s(literal 4 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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) 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))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (*.f64 (neg.f64 (log.f64 x.re)) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (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 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 y.im (.f64 x.re x.re))) #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.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 (.f64 #s(literal -1 binary64) 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 x.im x.im) (/.f64 y.im (.f64 x.re x.re))) #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.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 (.f64 #s(literal -1 binary64) 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 (.f64 x.im x.im) (/.f64 y.im (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.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 (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))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (fma.f64 (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 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)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))))))) (.f64 x.im x.im)) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.im)))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 y.re (.f64 x.re x.re))) #s(literal 1/2 binary64) (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 #s(literal -1 binary64) 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) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) y.re)) (.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 #s(literal -1 binary64) 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 (.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 1/720 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) y.re)) (.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (neg.f64 (*.f64 (neg.f64 (log.f64 x.re)) y.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 y.re (.f64 x.re x.re))) #s(literal 1/2 binary64) (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 #s(literal -1 binary64) 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) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) y.re)) (.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 #s(literal -1 binary64) 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 (.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 1/720 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) y.re)) (.f64 x.re x.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (.f64 (.f64 (.f64 x.im x.im) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64)))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (.f64 x.im x.im) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (/.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)))))))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (.f64 (.f64 y.re (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (.f64 x.im x.im) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal -1/8 binary64))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))) (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (.f64 (.f64 y.re (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (.f64 x.im x.im) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.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))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.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 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal -1/8 binary64))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) y.re) (pow.f64 x.re #s(literal 6 binary64)))) #s(literal 1/2 binary64) (fma.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.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 (neg.f64 (log.f64 x.re)) y.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 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal -1/8 binary64))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (pow.f64 x.re #s(literal 4 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 (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 (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 (exp (- (* (log (sqrt (+ (* x.re x.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.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 (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))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (fma.f64 (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im))))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))))))) (.f64 x.im x.im)) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))))) (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 (atan2.f64 x.im x.re) y.im))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (.f64 y.im y.im))) (.f64 (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (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 (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/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 (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/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 (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 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 (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* -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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (.f64 x.re x.re)) #s(literal -1/2 binary64) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* -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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (.f64 x.re x.re)) #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.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (pow.f64 x.re #s(literal 4 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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) 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))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (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 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 y.im (.f64 x.re x.re))) #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.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 (.f64 #s(literal -1 binary64) 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 x.im x.im) (/.f64 y.im (.f64 x.re x.re))) #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.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 (.f64 #s(literal -1 binary64) 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 (.f64 x.im x.im) (/.f64 y.im (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.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 (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))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (fma.f64 (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))))))) (.f64 x.im x.im)) (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))))) (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 (atan2.f64 x.im x.re) y.im))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (.f64 y.im y.im))) (.f64 (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im)))) (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 (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 y.re (.f64 x.re x.re))) #s(literal 1/2 binary64) (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 #s(literal -1 binary64) 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) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) y.re)) (.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 #s(literal -1 binary64) 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 (.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 1/720 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) y.re)) (.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 y.re (.f64 x.re x.re))) #s(literal 1/2 binary64) (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 #s(literal -1 binary64) 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) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) y.re)) (.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 #s(literal -1 binary64) 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 (.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 1/720 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) y.re)) (.f64 x.re x.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (.f64 (.f64 (.f64 x.im x.im) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64)))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (.f64 x.im x.im) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (/.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)))))))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (atan2.f64 x.im x.re) y.im))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (.f64 (.f64 y.re (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (atan2.f64 x.im x.re) y.im))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/4 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (atan2.f64 x.im x.re) y.im))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (atan2.f64 x.im x.re) y.im))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal -1/8 binary64))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))) (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (.f64 (.f64 y.re (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (atan2.f64 x.im x.re) y.im))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/4 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.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))))) (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) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (atan2.f64 x.im x.re) y.im))))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 x.im x.im) (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal -1/8 binary64))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) y.re) (pow.f64 x.re #s(literal 6 binary64)))) #s(literal 1/2 binary64) (fma.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (atan2.f64 x.im x.re) y.im))) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.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 (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 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (.f64 (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal -1/8 binary64))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (pow.f64 x.re #s(literal 4 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))) (.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 (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 (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 (log.f64 x.re) y.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 (- (* 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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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 (- (* 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 y.re (/.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (.f64 (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) (.f64 x.im x.im) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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 (- (* 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 y.re (/.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.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) (fma.f64 (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 y.re #s(literal 3 binary64))) (pow.f64 x.re #s(literal 6 binary64))))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im) (.f64 (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))) (.f64 x.im x.im))) (.f64 x.im x.im) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 y.re (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal -1/2 binary64))) (.f64 x.im x.im) (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.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))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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 (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)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64)))))) (.f64 x.im x.im) (.f64 (.f64 y.re (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64)))) (.f64 x.im x.im) (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.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))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64))) (fma.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64)))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.f64 (.f64 y.re (/.f64 (.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)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 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 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (fma.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64))) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.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)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))))) (.f64 x.im x.im) (.f64 (.f64 y.re (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64)))) (.f64 x.im x.im) (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))))
#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 (pow.f64 x.re y.re) y.re) (.f64 x.im x.im)) (.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) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/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) (fma.f64 (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.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) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (fma.f64 (-.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 6 binary64))) #s(literal 1/8 binary64) (.f64 (neg.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (fma.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64))) (pow.f64 x.re #s(literal 6 binary64)))))) (.f64 x.im x.im) (.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 (.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)))) #s(literal -1/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 (.f64 x.im x.im) (/.f64 y.im (.f64 x.re x.re))) #s(literal 1/2 binary64) (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 (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (.f64 (.f64 (.f64 x.im x.im) y.re) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) #s(literal 1/2 binary64) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 y.re (/.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (.f64 (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) (.f64 x.im x.im) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 y.re (/.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.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) (fma.f64 (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 y.re #s(literal 3 binary64))) (pow.f64 x.re #s(literal 6 binary64))))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im) (.f64 (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))) (.f64 x.im x.im))) (.f64 x.im x.im) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 y.re (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal -1/2 binary64))) (.f64 x.im x.im) (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.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))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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 (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)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64)))))) (.f64 x.im x.im) (.f64 (.f64 y.re (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64)))) (.f64 x.im x.im) (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.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))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64))) (fma.f64 (fma.f64 (.f64 y.im (/.f64 (.f64 (.f64 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64)))) (.f64 x.re x.re))) #s(literal -1/2 binary64) (fma.f64 (.f64 y.re (/.f64 (.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)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 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 (sin.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (fma.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64))) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.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)))))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))))) (.f64 x.im x.im) (.f64 (.f64 y.re (/.f64 (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64)))) (.f64 x.im x.im) (.f64 (cos.f64 (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (log.f64 x.re) y.re (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) y.re)) (.f64 x.re x.re))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (fma.f64 (/.f64 y.re (.f64 x.re x.re)) #s(literal 1/2 binary64) (/.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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (fma.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 (/.f64 y.re (.f64 x.re x.re)) #s(literal 1/2 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.im x.im) (* x.re x.re)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (*.f64 (log.f64 x.re) y.re))
#s(approx (* (log (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 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (fma.f64 (log.f64 x.re) y.re (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) y.re)) (.f64 x.re x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (fma.f64 (/.f64 y.re (.f64 x.re x.re)) #s(literal 1/2 binary64) (/.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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (fma.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 (/.f64 y.re (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 x.im x.im) (.f64 (log.f64 x.re) y.re)))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.im x.im) y.im) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (fma.f64 (fma.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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)))) #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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 x.im x.im) (.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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))) (.f64 x.im x.im) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (fma.f64 (fma.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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)))) #s(literal -1/4 binary64) (fma.f64 (fma.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (fma.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64))) (pow.f64 x.re #s(literal 6 binary64)))))) (.f64 x.im x.im) (.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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 x.im x.im) (.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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))) (.f64 x.im x.im) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 y.im (/.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) (.f64 y.re (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))))) (.f64 x.im x.im) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 y.im (/.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) (.f64 y.re (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)))) (.f64 (fma.f64 (/.f64 (.f64 (.f64 y.im y.re) (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/4 binary64) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64))) (fma.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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)))) #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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 x.im x.im))) (.f64 x.im x.im) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 y.im (/.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)) (.f64 y.re (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re)))) (.f64 (fma.f64 (/.f64 (.f64 (.f64 y.im y.re) (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.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 (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64))) (fma.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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)))) #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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 (fma.f64 (.f64 y.im (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (fma.f64 (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) #s(literal -1/4 binary64)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (fma.f64 (.f64 y.re (/.f64 (.f64 (fma.f64 (.f64 y.im (/.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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)))) #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.re x.re))) #s(literal 1/2 binary64) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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) (fma.f64 (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 y.re #s(literal 3 binary64))) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 (/.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (fma.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal -1/48 binary64) (pow.f64 y.im #s(literal 3 binary64))) (pow.f64 x.re #s(literal 6 binary64)))))))))) (.f64 x.im x.im)))) (.f64 x.im x.im))) (.f64 x.im x.im) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 x.re) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (.f64 (log.f64 x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))))
#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 (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 (exp (- (* (log (sqrt (+ (* x.re x.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 (neg.f64 (log.f64 x.im)) y.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.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) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.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.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) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.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.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) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.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 (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))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.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 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) #s(literal 1 binary64)) (.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (fma.f64 (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im))))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) 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)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))))))) (.f64 x.re x.re)) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (.f64 y.im y.im))) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))))) (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/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 (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/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 (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 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 (neg.f64 (*.f64 (neg.f64 (log.f64 x.im)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (*.f64 (neg.f64 (log.f64 x.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 (+ (* -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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (.f64 x.im x.im)) #s(literal -1/2 binary64) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.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 (+ (* -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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (.f64 x.im 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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (pow.f64 x.im #s(literal 4 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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) 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.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (/.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 (+ (* (log (sqrt (+ (* x.re 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 (atan2.f64 x.im x.re) y.re (neg.f64 (*.f64 (neg.f64 (log.f64 x.im)) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (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 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 y.im (.f64 x.im 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 (.f64 #s(literal -1 binary64) 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 x.re x.re) (/.f64 y.im (.f64 x.im 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 (.f64 #s(literal -1 binary64) 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 x.re x.re) (/.f64 y.im (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.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 (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))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (fma.f64 (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) 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)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))))))) (.f64 x.re x.re)) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))) (.f64 y.im y.im))) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.im))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 y.re (.f64 x.im x.im))) #s(literal 1/2 binary64) (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 #s(literal -1 binary64) 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) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) y.re)) (.f64 x.im x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 #s(literal -1 binary64) 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 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) y.re)) (.f64 x.im x.im))))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (neg.f64 (*.f64 (neg.f64 (log.f64 x.im)) y.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 y.re (.f64 x.im x.im))) #s(literal 1/2 binary64) (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 #s(literal -1 binary64) 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) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) y.re)) (.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 #s(literal -1 binary64) 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 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) y.re)) (.f64 x.im x.im))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64)))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (.f64 x.re x.re) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (/.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)))))))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (.f64 (.f64 y.re (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 x.re x.re) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))) (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (.f64 (.f64 y.re (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 x.re x.re) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.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))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.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 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) y.re) (pow.f64 x.im #s(literal 6 binary64)))) #s(literal 1/2 binary64) (fma.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.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 (neg.f64 (log.f64 x.im)) y.re)) (.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 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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))))) (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 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (neg.f64 (log.f64 x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im))) (exp.f64 (-.f64 (neg.f64 (.f64 (neg.f64 (log.f64 x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (pow.f64 x.im #s(literal 4 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 (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 (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 (exp (- (* (log (sqrt (+ (* x.re x.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 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.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.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) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.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.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) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.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.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) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.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 (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))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (fma.f64 (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im))))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) 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)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))))))) (.f64 x.re x.re)) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))))) (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 (atan2.f64 x.im x.re) y.im))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (.f64 y.im y.im))) (.f64 (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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 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 (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/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 (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/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 (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 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 (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.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 (+ (* -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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (.f64 x.im x.im)) #s(literal -1/2 binary64) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.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 (+ (* -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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (.f64 x.im 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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/8 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im y.im)) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (pow.f64 x.im #s(literal 4 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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) 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.im) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (/.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 (+ (* (log (sqrt (+ (* x.re 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 (atan2.f64 x.im x.re) y.re (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (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 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 y.im (.f64 x.im 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 (.f64 #s(literal -1 binary64) 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 x.re x.re) (/.f64 y.im (.f64 x.im 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 (.f64 #s(literal -1 binary64) 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 x.re x.re) (/.f64 y.im (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.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 (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))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.re (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (.f64 x.im x.im))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (fma.f64 (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (*.f64 (atan2.f64 x.im x.re) y.im))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 y.im (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) 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)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) y.re) (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))))) (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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))))))) (.f64 x.re x.re)) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (atan2.f64 x.im x.re) y.re (neg.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 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))))) (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 (atan2.f64 x.im x.re) y.im))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im)))) (.f64 y.im y.im))) (.f64 (sin.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 y.re (.f64 x.im x.im))) #s(literal 1/2 binary64) (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 #s(literal -1 binary64) 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) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) y.re)) (.f64 x.im x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 (.f64 #s(literal -1 binary64) 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 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) y.re)) (.f64 x.im x.im))))) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 y.re (.f64 x.im x.im))) #s(literal 1/2 binary64) (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 #s(literal -1 binary64) 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) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) y.re)) (.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (fma.f64 (.f64 #s(literal -1 binary64) 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 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) y.re)) (.f64 x.im x.im))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64)))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (+.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (pow.f64 x.im #s(literal 4 binary64))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.im y.im)) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (.f64 x.re x.re) y.im) (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (/.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)))))))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (atan2.f64 x.im x.re) y.im))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (.f64 (.f64 y.re (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (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 x.re x.re) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (atan2.f64 x.im x.re) y.im))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (atan2.f64 x.im x.re) y.im))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))))) (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (.f64 (.f64 y.re (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (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 x.re x.re) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (.f64 x.im x.im))) #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im) (.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.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))))) (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) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (atan2.f64 x.im x.re) y.im))))) (.f64 x.im x.im)) #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 x.re x.re) (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) y.re) (pow.f64 x.im #s(literal 6 binary64)))) #s(literal 1/2 binary64) (fma.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (atan2.f64 x.im x.re) y.im))) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (.f64 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.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 (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 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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))))) (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 (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 y.im y.im)) (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (cos.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) y.im))) (exp.f64 (-.f64 (neg.f64 (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)) (.f64 (atan2.f64 x.im x.re) y.im)))) (pow.f64 x.im #s(literal 4 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))) (.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 (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))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) y.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))) #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)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) y.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))) #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) (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 (.f64 #s(literal 1/6 binary64) y.re) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) y.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 (* (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)) (neg.f64 (.f64 (.f64 (exp.f64 (.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)) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (+.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (exp.f64 (.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 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (exp.f64 (.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(literal -1/2 binary64)))) y.re (.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))) (neg.f64 (.f64 (.f64 (exp.f64 (.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)) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (atan2.f64 x.im x.re)) (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (exp.f64 (.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)) (exp.f64 (.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))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 #s(literal -1/2 binary64) (exp.f64 (.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)) (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 (.f64 (exp.f64 (.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)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) y.re (.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))) y.re (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (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) #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 (cos (+ (* (log (sqrt (+ (* 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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (.f64 #s(literal -1 binary64) y.re) (.f64 (sin.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (atan2.f64 x.im x.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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (PI.f64))) (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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (PI.f64))) (atan2.f64 x.im x.re))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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 (log.f64 (hypot.f64 x.im x.re)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) y.re (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) y.re (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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) (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 (.f64 #s(literal 1/6 binary64) y.re) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) y.re (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)) (neg.f64 (.f64 (.f64 (exp.f64 (.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)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (+.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (exp.f64 (.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 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (exp.f64 (.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(literal -1/2 binary64)))) y.re (.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))) (neg.f64 (.f64 (.f64 (exp.f64 (.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)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (atan2.f64 x.im x.re)) (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (exp.f64 (.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)) (exp.f64 (.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))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 #s(literal -1/2 binary64) (exp.f64 (.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)) (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 (.f64 (exp.f64 (.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)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) y.re (.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))) y.re (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.re))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (.f64 (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)) y.re (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) y.re) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))) y.re (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) y.re) (.f64 (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re (.f64 (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))) y.re (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 (PI.f64) #s(literal 1/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.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (log.f64 (hypot.f64 x.im 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))) (atan2.f64 x.im x.re)) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))))) y.re (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (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)) (.f64 (.f64 #s(literal 1/2 binary64) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))))) y.re (fma.f64 (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (log.f64 (hypot.f64 x.im 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))) (atan2.f64 x.im x.re)) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64))))))) y.re (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.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))) (fma.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 #s(literal 1/6 binary64) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))) y.re (.f64 (.f64 (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (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)))))) y.re (fma.f64 (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (log.f64 (hypot.f64 x.im 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))) (atan2.f64 x.im x.re)) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64))))))) y.re (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (PI) 1/2) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* (PI) 1/2) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
#s(approx (sin (+ (* (PI) 1/2) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (PI) 1/2) (* (atan2 x.im x.re) y.re))) (fma.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) y.re (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
#s(approx (sin (+ (* (PI) 1/2) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (PI) 1/2) (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) y.re) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) y.re (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))
#s(approx (sin (+ (* (PI) 1/2) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (PI) 1/2) (* (atan2 x.im x.re) y.re))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) y.re) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y.re (.f64 (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) y.re (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
#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 (PI.f64) #s(literal 1/2 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 (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 (log.f64 (hypot.f64 x.im x.re)) y.re (*.f64 (neg.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))) (cos (+ (* (log (sqrt (+ (* 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (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) #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 (+ (* (log (sqrt (+ (* 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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (log.f64 (hypot.f64 x.im x.re)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 (fma.f64 (/.f64 (.f64 (atan2.f64 x.im x.re) y.im) y.re) #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re))) y.re))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))))
#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 (atan2.f64 x.im x.re) y.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 (fma.f64 (/.f64 (PI.f64) y.re) #s(literal 1/2 binary64) (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.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)) (neg.f64 (.f64 (.f64 #s(literal -1 binary64) (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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (neg.f64 (*.f64 (fma.f64 y.im (/.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (log.f64 (hypot.f64 x.im x.re)))) y.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 (fma.f64 (/.f64 (PI.f64) y.re) #s(literal -1/2 binary64) (neg.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 (.f64 #s(literal -1 binary64) 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 (neg.f64 (atan2.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.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 (fma.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))) (.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))) y.im (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.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))) (cos (+ (* (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (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 (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)) 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (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 (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)) 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 (cos (+ (* (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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (.f64 #s(literal -1 binary64) 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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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 (.f64 #s(literal -1 binary64) 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.im x.im) (* x.re x.re)))) 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 (neg.f64 (atan2.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) y.im (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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 (fma.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))) (.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))) y.im (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) y.im (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (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 (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)) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im))) (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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (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 (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)) 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 (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))) (log.f64 (hypot.f64 x.im x.re))) y.im (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) y.im) (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))) (log.f64 (hypot.f64 x.im x.re)))) y.im (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) y.im) (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (.f64 (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -1/2 binary64))) y.im (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))) (log.f64 (hypot.f64 x.im x.re)))) y.im (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re) (neg.f64 (.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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)))) y.im (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (atan2.f64 x.im x.re)) (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 (pow.f64 (hypot.f64 x.im x.re) y.re) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) y.im (.f64 (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (log.f64 (hypot.f64 x.im x.re))) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))))) y.im (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 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))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (atan2.f64 x.im x.re)) (fma.f64 (+.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))) (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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 3 binary64))) (fma.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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))) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (atan2.f64 x.im x.re))))))) y.im (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.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)))))) (neg.f64 (.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))))) y.im (.f64 (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (log.f64 (hypot.f64 x.im x.re))) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re)))))) y.im (.f64 (pow.f64 (hypot.f64 x.im x.re) y.re) (sin.f64 (fma.f64 (PI.f64) #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 (* 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.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) 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 (* -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)) (neg.f64 (.f64 (.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)))) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 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.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (neg.f64 (.f64 (.f64 #s(literal -1 binary64) (-.f64 (*.f64 y.re (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (atan2.f64 x.im x.re))) y.im)))

rewrite149.0ms (1.3%)

Memory

-12.2MiB live, 124.0MiB allocated; 9ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	72	496
0	121	484
1	377	482
0	2509	470

Stop Event

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

Counts

29 → 348

Calls

Call 1

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

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

eval178.0ms (1.6%)

Memory: 8.6MiB live, 206.1MiB allocated; 114ms collecting garbage
Compiler: Compiled 61 153 to 4 227 computations (93.1% saved)

prune113.0ms (1%)

Memory

-7.7MiB live, 141.4MiB allocated; 15ms collecting garbage

Pruning

34 alts after pruning (33 fresh and 1 done)

	Pruned	Kept	Total
New	685	20	705
Fresh	19	13	32
Picked	4	1	5
Done	0	0	0
Total	708	34	742

Accuracy

96.1%

Counts

742 → 34

Alt Table

Click to see full alt table

Status	Accuracy	Program
	32.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (neg.f64 #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)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	33.2%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	48.4%	(.f64 (exp.f64 #s(approx (- ( (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
	48.9%	(.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 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
	55.8%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.re x.im)) #s(approx (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
	55.9%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 y.im y.re) (atan2.f64 x.im x.re)) y.re)))))
	23.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (neg.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re) x.re))) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	57.1%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	28.6%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (.f64 (atan2.f64 x.im x.re) y.re))))))
	56.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) y.re)))))
	48.8%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) y.re)))))
	22.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 x.re y.re) y.re) (.f64 x.im x.im)) (.f64 x.re x.re)) #s(literal 1/2 binary64) (pow.f64 x.re y.re)))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
	18.0%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (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)))) (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))))
	25.4%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 (/.f64 (.f64 (pow.f64 x.re y.re) y.re) x.re) (/.f64 (.f64 x.im x.im) x.re)) #s(literal 1/2 binary64) (pow.f64 x.re y.re)))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
	22.7%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.re #s(literal 1 binary64)))) (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))))
	22.0%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))) (cos.f64 (+.f64 (.f64 (log.f64 #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))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	39.9%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
	11.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (sin.f64 (fma.f64 (log.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.im (fma.f64 (atan2.f64 x.im x.re) y.re (/.f64 (PI.f64) #s(literal 2 binary64))))))
	12.7%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (sin.f64 (+.f64 (neg.f64 (fma.f64 (log.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.im (.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	22.0%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (log.f64 x.im) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))))
	35.4%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))
	37.5%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))
	22.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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)))))
	22.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (sin.f64 (+.f64 (neg.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	10.6%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (cos.f64 (+.f64 (.f64 (log.f64 #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))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	22.6%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (cos.f64 #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))))
✓	22.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (cos.f64 #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))))
	9.5%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.im))))))
	11.9%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (fma.f64 (atan2.f64 x.im x.re) y.re (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.im))))))
	13.4%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (fma.f64 (log.f64 x.re) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))))
	10.3%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (fma.f64 (log.f64 x.im) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))))
	22.9%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))
	49.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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
	49.1%	#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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))

Compiler

Compiled 7 013 to 1 530 computations (78.2% saved)

regimes178.0ms (1.6%)

Memory

-9.7MiB live, 130.2MiB allocated; 15ms collecting garbage

Counts

87 → 3

Calls

Call 1

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

Outputs

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

(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #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))))
43.0ms	y.im
41.0ms	x.im
21.0ms	y.re
21.0ms	x.re

Results

Accuracy	Segments	Branch
73.3%	3	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
68.1%	2	`x.re`
75.3%	5	`x.im`
78.7%	3	`y.re`
82.7%	6	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes40.0ms (0.4%)

Memory

22.7MiB live, 66.2MiB allocated; 5ms collecting garbage

Counts

65 → 3

Calls

Call 1

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

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

Calls

2 calls:

20.0ms	y.im
16.0ms	y.re

Results

Accuracy	Segments	Branch
76.0%	4	`y.im`
77.6%	3	`y.re`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes28.0ms (0.3%)

Memory

-21.4MiB live, 24.1MiB allocated; 3ms collecting garbage

Counts

47 → 3

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

25.0ms

y.re

Results

Accuracy	Segments	Branch
76.1%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes13.0ms (0.1%)

Memory

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

Counts

38 → 3

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

10.0ms

y.re

Results

Accuracy	Segments	Branch
75.3%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes11.0ms (0.1%)

Memory

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

Counts

32 → 3

Calls

Call 1

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

Outputs

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

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

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

9.0ms

y.re

Results

Accuracy	Segments	Branch
75.0%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes19.0ms (0.2%)

Memory

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

Counts

30 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

8.0ms	y.im
8.0ms	y.re

Results

Accuracy	Segments	Branch
71.2%	3	`y.im`
73.5%	3	`y.re`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes61.0ms (0.6%)

Memory

-47.5MiB live, 9.6MiB allocated; 4ms collecting garbage

Counts

21 → 4

Calls

Call 1

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

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

Calls

2 calls:

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

6.0ms

y.re

Results

Accuracy	Segments	Branch
59.0%	2	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
74.2%	4	`y.re`

Compiler

Compiled 38 to 23 computations (39.5% saved)

regimes26.0ms (0.2%)

Memory

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

Counts

17 → 2

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes20.0ms (0.2%)

Memory

-22.5MiB live, 21.0MiB allocated; 5ms collecting garbage

Counts

16 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

13.0ms	y.im
5.0ms	y.re

Results

Accuracy	Segments	Branch
58.2%	2	`y.im`
56.3%	1	`y.re`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes23.0ms (0.2%)

Memory

11.3MiB live, 54.8MiB allocated; 4ms collecting garbage

Counts

13 → 3

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

6.0ms	x.im
4.0ms	y.im
4.0ms	x.re
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
51.2%	2	`x.im`
56.9%	3	`y.re`
48.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))))`
53.9%	2	`x.re`
48.9%	1	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes26.0ms (0.2%)

Memory

14.4MiB live, 55.0MiB allocated; 7ms collecting garbage

Counts

8 → 4

Calls

Call 1

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
45.1%	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))))`
39.9%	1	`y.im`
46.5%	3	`x.im`
44.6%	2	`x.re`
53.1%	4	`y.re`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes3.0ms (0%)

Memory

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

Counts

5 → 3

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

2.0ms

y.re

Results

Accuracy	Segments	Branch
47.2%	3	`y.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes24.0ms (0.2%)

Memory

-39.6MiB live, 21.2MiB allocated; 23ms collecting garbage

Counts

4 → 1

Calls

Call 1

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

Outputs

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes8.0ms (0.1%)

Memory

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

Counts

3 → 1

Calls

Call 1

Inputs

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

Outputs

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes5.0ms (0%)

Memory

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

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

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

Outputs

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 41 to 35 computations (14.6% saved)

bsearch96.0ms (0.9%)

Memory

15.9MiB live, 151.7MiB allocated; 15ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
45.0ms	4.956892662854578e-13	5541.131344376536
43.0ms	-1.902423319590013e-9	-1.9239582675935054e-15

Samples

47.0ms	103×	1	valid
28.0ms	201×	0	valid

Compiler

Compiled 2 007 to 1 278 computations (36.3% saved)

Precisions

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

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

ival-hypot: 13.0ms (20.4% of total)

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

ival-cos: 9.0ms (14.1% of total)

adjust: 5.0ms (7.8% of total)

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

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

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

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

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

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

bsearch96.0ms (0.9%)

Memory

-34.4MiB live, 63.2MiB allocated; 19ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
79.0ms	5541.131344376536	208952.46444817094
14.0ms	-1.902423319590013e-9	-1.9239582675935054e-15

Samples

11.0ms	83×	0	valid
10.0ms	29×	1	valid

Compiler

Compiled 1 737 to 1 049 computations (39.6% saved)

Precisions

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

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

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

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

adjust: 2.0ms (11.9% of total)

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

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

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

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

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

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

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

bsearch32.0ms (0.3%)

Memory

-0.2MiB live, 45.6MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5541.131344376536	208952.46444817094
28.0ms	-1.902423319590013e-9	-1.9239582675935054e-15

Samples

12.0ms	36×	1	valid
9.0ms	76×	0	valid

Compiler

Compiled 1 836 to 1 058 computations (42.4% saved)

Precisions

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

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

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

adjust: 2.0ms (11.8% of total)

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

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

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

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

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

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

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

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

bsearch29.0ms (0.3%)

Memory

5.7MiB live, 50.3MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
25.0ms	5541.131344376536	208952.46444817094
2.0ms	-1.902423319590013e-9	-1.9239582675935054e-15

Samples

12.0ms	30×	1	valid
9.0ms	66×	0	valid

Compiler

Compiled 1 788 to 1 010 computations (43.5% saved)

Precisions

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

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

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

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

adjust: 2.0ms (11.4% of total)

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

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

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

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

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

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

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

bsearch42.0ms (0.4%)

Memory

3.7MiB live, 54.0MiB allocated; 7ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5541.131344376536	208952.46444817094
37.0ms	-6.680213253652022e-21	-1.1685388853619529e-29

Samples

17.0ms	50×	1	valid
14.0ms	94×	0	valid

Compiler

Compiled 1 676 to 930 computations (44.5% saved)

Precisions

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

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

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

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

adjust: 3.0ms (11.7% of total)

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

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

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

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

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

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

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

bsearch3.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5541.131344376536	208952.46444817094
1.0ms	-6.680213253652022e-21	-1.1685388853619529e-29

Compiler

Compiled 1 704 to 965 computations (43.4% saved)

bsearch81.0ms (0.7%)

Memory

14.8MiB live, 106.4MiB allocated; 6ms collecting garbage

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
39.0ms	2.003384782912366e+121	1.1558108145667894e+125
33.0ms	1350097548363079.8	1.5192328922632433e+22
1.0ms	-6.680213253652022e-21	-1.1685388853619529e-29

Samples

40.0ms	115×	1	valid
21.0ms	157×	0	valid

Compiler

Compiled 2 868 to 1 571 computations (45.2% saved)

Precisions

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

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

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

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

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

adjust: 6.0ms (12% of total)

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

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

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

bsearch15.0ms (0.1%)

Memory

-24.7MiB live, 21.1MiB allocated; 8ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
14.0ms	1.7567481835977737e+121	2.003384782912366e+121

Samples

11.0ms	20×	1	valid
1.0ms	12×	0	valid

Compiler

Compiled 252 to 143 computations (43.3% saved)

Precisions

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

adjust: 5.0ms (46.1% of total)

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

ival-hypot: 1.0ms (9.2% of total)

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

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

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

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

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

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

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

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

bsearch40.0ms (0.4%)

Memory

6.5MiB live, 58.4MiB allocated; 5ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
37.0ms	-4.450495152262429e+41	-2.478452577162739e+40

Samples

28.0ms	78×	1	valid
4.0ms	34×	0	valid

Compiler

Compiled 761 to 408 computations (46.4% saved)

Precisions

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

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

adjust: 4.0ms (14.9% of total)

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

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

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

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

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

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

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

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

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

bsearch103.0ms (0.9%)

Memory

-8.1MiB live, 82.0MiB allocated; 8ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
63.0ms	3.6145330833720177e-169	1.1696814373927019e-167
30.0ms	-1.902423319590013e-9	-1.9239582675935054e-15

Samples

63.0ms	83×	1	valid
19.0ms	157×	0	valid

Compiler

Compiled 1 896 to 1 047 computations (44.8% saved)

Precisions

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

ival-mult: 45.0ms (61.2% of total)

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

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

adjust: 4.0ms (5.4% of total)

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

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

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

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

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

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

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

bsearch104.0ms (0.9%)

Memory

29.5MiB live, 130.3MiB allocated; 31ms collecting garbage

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	predicate-same

Steps

Time	Left	Right
51.0ms	8.712638974520514e-77	9.96644180808018e-70
39.0ms	-5.409083944256057e+22	-1637125191061.1262
8.0ms	-4.271842163805297e+151	-3.769216552206642e+145

Samples

54.0ms	105×	1	valid
28.0ms	231×	0	valid

Compiler

Compiled 2 552 to 1 355 computations (46.9% saved)

Precisions

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

ival-sub: 18.0ms (25.5% of total)

ival-mult: 16.0ms (22.7% of total)

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

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

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

adjust: 5.0ms (7.1% of total)

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

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

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

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

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

bsearch69.0ms (0.6%)

Memory

9.6MiB live, 101.2MiB allocated; 7ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
35.0ms	4.956892662854578e-13	5541.131344376536
28.0ms	-515.3275509537647	-43.8382599791366

Samples

29.0ms	71×	1	valid
21.0ms	169×	0	valid

Compiler

Compiled 1 960 to 1 047 computations (46.6% saved)

Precisions

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

ival-mult: 15.0ms (35.3% of total)

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

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

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

adjust: 4.0ms (9.4% of total)

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

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

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

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

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

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

simplify87.0ms (0.8%)

Memory

-22.9MiB live, 74.2MiB allocated; 9ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	161	2056
1	225	1986
2	349	1986
3	580	1986
4	1317	1986

Stop Event

1×	node limit

Calls

Call 1

Inputs
(if (<=.f64 y.re #s(literal -290142196707511/4835703278458516698824704 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 2508757194024499/147573952589676412928 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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #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 -290142196707511/4835703278458516698824704 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 88000 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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))))
(if (<=.f64 y.re #s(literal -4593918114535591/2417851639229258349412352 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 88000 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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))))
(if (<=.f64 y.re #s(literal -4593918114535591/2417851639229258349412352 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 8500 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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))))
(if (<=.f64 y.re #s(literal -8639981972601953/1329227995784915872903807060280344576 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 85000 binary64)) (.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #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 -8639981972601953/1329227995784915872903807060280344576 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 85000 binary64)) (.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(if (<=.f64 y.re #s(literal -8639981972601953/1329227995784915872903807060280344576 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 48000000000000000 binary64)) (.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 3300000000000000029191638109988831631356124291596736153079986479525215603380451628591104492941094586096531002167770214301696 binary64)) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) y.re))))))))
(if (<=.f64 y.re #s(literal 18500000000000000633469808922449008190607037763257694184987176529992281305802548652877362834916963666096474376529913053184 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (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 #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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) y.re))))))
(if (<=.f64 y.im #s(literal -130000000000000002740292549936418494873600 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #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 -4704172149284445/4951760157141521099596496896 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 3054043458696411/265568996408383549344794103276234313664796558863515961599722069100201779930426121369581251132614642834444664743123250507673289668826353619704759989383293675971915635417696609515864064 binary64)) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))))
(if (<=.f64 y.re #s(literal -40000000000000000687101295488708764721572416337221820430929313780800125051127541680330506971444692730890183838174171339147724505780692024998538197860352 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal -1650000000000 binary64)) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 3807631028762429/3885337784451458141838923813647037813284813678104279042503624819477808570410416996352 binary64)) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))))))
(if (<=.f64 y.re #s(literal -45 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 5476377146882523/576460752303423488 binary64)) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))))
(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (cos.f64 #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))))

Outputs
(if (<=.f64 y.re #s(literal -290142196707511/4835703278458516698824704 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 2508757194024499/147573952589676412928 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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #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 -290142196707511/4835703278458516698824704 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 88000 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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))))
(if (<=.f64 y.re #s(literal -4593918114535591/2417851639229258349412352 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 88000 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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (.f64 (PI.f64) #s(literal 1/2 binary64)))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))))
(if (<=.f64 y.re #s(literal -4593918114535591/2417851639229258349412352 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 8500 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.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2))))) (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))))
(if (<=.f64 y.re #s(literal -8639981972601953/1329227995784915872903807060280344576 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 85000 binary64)) (.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #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 -8639981972601953/1329227995784915872903807060280344576 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 85000 binary64)) (.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (neg.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(if (<=.f64 y.re #s(literal -8639981972601953/1329227995784915872903807060280344576 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 48000000000000000 binary64)) (.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 3300000000000000029191638109988831631356124291596736153079986479525215603380451628591104492941094586096531002167770214301696 binary64)) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) y.re))))))))
(if (<=.f64 y.re #s(literal 18500000000000000633469808922449008190607037763257694184987176529992281305802548652877362834916963666096474376529913053184 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (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 #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 (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (atan2.f64 x.im x.re) y.re))))))
(if (<=.f64 y.im #s(literal -130000000000000002740292549936418494873600 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (cos.f64 #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 -4704172149284445/4951760157141521099596496896 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 3054043458696411/265568996408383549344794103276234313664796558863515961599722069100201779930426121369581251132614642834444664743123250507673289668826353619704759989383293675971915635417696609515864064 binary64)) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))))
(if (or (<=.f64 y.re #s(literal -4704172149284445/4951760157141521099596496896 binary64)) (not (<=.f64 y.re #s(literal 3054043458696411/265568996408383549344794103276234313664796558863515961599722069100201779930426121369581251132614642834444664743123250507673289668826353619704759989383293675971915635417696609515864064 binary64)))) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im)))))
(if (<=.f64 y.re #s(literal -40000000000000000687101295488708764721572416337221820430929313780800125051127541680330506971444692730890183838174171339147724505780692024998538197860352 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal -1650000000000 binary64)) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 3807631028762429/3885337784451458141838923813647037813284813678104279042503624819477808570410416996352 binary64)) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re)))))))
(if (<=.f64 y.re #s(literal -40000000000000000687101295488708764721572416337221820430929313780800125051127541680330506971444692730890183838174171339147724505780692024998538197860352 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (or (<=.f64 y.re #s(literal -1650000000000 binary64)) (not (<=.f64 y.re #s(literal 3807631028762429/3885337784451458141838923813647037813284813678104279042503624819477808570410416996352 binary64)))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (cos.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))))))
(if (<=.f64 y.re #s(literal -45 binary64)) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 y.re #s(literal 5476377146882523/576460752303423488 binary64)) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 (atan2.f64 x.im x.re) y.re))))))
(if (or (<=.f64 y.re #s(literal -45 binary64)) (not (<=.f64 y.re #s(literal 5476377146882523/576460752303423488 binary64)))) (.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 (atan2.f64 x.im x.re) y.re)))) (.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) #s(approx (sin (+ (* y.im (log (sqrt (+ (* x.re x.re) (* x.im x.im))))) (+ (* (atan2 x.im x.re) y.re) (/ (PI) 2)))) (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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #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 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))) (cos.f64 #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))))

derivations861.0ms (7.8%)

Memory

-31.0MiB live, 437.2MiB allocated; 730ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 2 056 to 165 computations (92% saved)

preprocess79.0ms (0.7%)

Memory: 22.3MiB live, 114.3MiB allocated; 7ms collecting garbage
Compiler: Compiled 4 186 to 368 computations (91.2% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze594.0ms (5.3%)

sample2.6s (23.8%)

explain520.0ms (4.7%)

preprocess266.0ms (2.4%)

eval0.0ms (0%)

prune0.0ms (0%)

simplify170.0ms (1.5%)

localize147.0ms (1.3%)

series64.0ms (0.6%)

simplify220.0ms (2%)

rewrite125.0ms (1.1%)

eval69.0ms (0.6%)

prune21.0ms (0.2%)

simplify153.0ms (1.4%)

localize189.0ms (1.7%)

series81.0ms (0.7%)

simplify240.0ms (2.2%)

rewrite235.0ms (2.1%)

eval237.0ms (2.1%)

prune107.0ms (1%)

simplify207.0ms (1.9%)

localize211.0ms (1.9%)

series171.0ms (1.5%)

simplify253.0ms (2.3%)

rewrite105.0ms (0.9%)

eval141.0ms (1.3%)

prune111.0ms (1%)

simplify221.0ms (2%)

localize318.0ms (2.9%)

series287.0ms (2.6%)

simplify329.0ms (3%)

rewrite149.0ms (1.3%)

eval178.0ms (1.6%)

prune113.0ms (1%)

regimes178.0ms (1.6%)

regimes40.0ms (0.4%)

regimes28.0ms (0.3%)

regimes13.0ms (0.1%)

regimes11.0ms (0.1%)

regimes19.0ms (0.2%)

regimes61.0ms (0.6%)

regimes26.0ms (0.2%)

regimes20.0ms (0.2%)

regimes23.0ms (0.2%)

regimes26.0ms (0.2%)

regimes3.0ms (0%)

regimes24.0ms (0.2%)

regimes8.0ms (0.1%)

regimes5.0ms (0%)

bsearch96.0ms (0.9%)

bsearch96.0ms (0.9%)

bsearch32.0ms (0.3%)

bsearch29.0ms (0.3%)

bsearch42.0ms (0.4%)

bsearch3.0ms (0%)

bsearch81.0ms (0.7%)

bsearch15.0ms (0.1%)

bsearch40.0ms (0.4%)

bsearch103.0ms (0.9%)

bsearch104.0ms (0.9%)

bsearch69.0ms (0.6%)

simplify87.0ms (0.8%)

derivations861.0ms (7.8%)

preprocess79.0ms (0.7%)

end0.0ms (0%)

Profiling